/ Garbo / Garbo.cdr / mac / progrmng / stdio.sit / stdio diffs

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 73 74 64 69 6f 20 | 64 69 66 66 73 00 00 00 |..stdio |diffs...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 41 43 | 41 01 00 00 00 00 00 00 |.TEXTMAC|A.......|
|00000050| 00 00 00 00 00 36 ae 00 | 00 01 59 a1 60 40 2f a1 |.....6..|..Y.`@/.|
|00000060| 60 40 2f 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |`@/.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 eb a5 00 00 |........|........|
|00000080| 48 65 72 65 20 61 72 65 | 20 64 69 66 66 73 20 74 |Here are| diffs t|
|00000090| 6f 20 61 70 70 6c 79 20 | 74 6f 20 4c 53 43 20 33 |o apply |to LSC 3|
|000000a0| 2e 30 20 73 74 64 69 6f | 20 6c 69 62 72 61 72 79 |.0 stdio| library|
|000000b0| 20 73 6f 75 72 63 65 73 | 20 74 6f 20 61 64 64 20 | sources| to add |
|000000c0| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 0d 66 75 |the foll|owing.fu|
|000000d0| 6e 63 74 69 6f 6e 61 6c | 69 74 79 3a 0d 2a 09 25 |nctional|ity:.*.%|
|000000e0| 6b 20 61 6e 64 20 25 6c | 6b 20 66 6f 72 6d 61 74 |k and %l|k format|
|000000f0| 73 20 66 6f 72 20 70 72 | 69 6e 74 66 28 29 20 28 |s for pr|intf() (|
|00000100| 26 20 43 6f 2e 29 0d 09 | 54 68 65 73 65 20 66 6f |& Co.)..|These fo|
|00000110| 72 6d 61 74 73 20 70 72 | 69 6e 74 20 69 6e 74 73 |rmats pr|int ints|
|00000120| 20 28 25 6b 29 20 61 6e | 64 20 6c 6f 6e 67 73 20 | (%k) an|d longs |
|00000130| 28 25 6c 6b 29 20 61 73 | 20 63 68 61 72 61 63 74 |(%lk) as| charact|
|00000140| 65 72 73 2c 20 75 73 65 | 66 75 6c 20 66 6f 72 20 |ers, use|ful for |
|00000150| 52 65 73 54 79 70 65 20 | 76 61 6c 75 65 73 2e 0d |ResType |values..|
|00000160| 2a 09 4e 65 77 20 27 64 | 65 76 69 63 65 27 20 22 |*.New 'd|evice' "|
|00000170| 2e 53 46 22 20 66 6f 72 | 20 66 6f 70 65 6e 28 29 |.SF" for| fopen()|
|00000180| 20 61 6e 64 20 66 72 69 | 65 6e 64 73 2e 0d 09 54 | and fri|ends...T|
|00000190| 68 65 20 27 64 65 76 69 | 63 65 27 20 22 2e 53 46 |he 'devi|ce' ".SF|
|000001a0| 22 20 63 61 75 73 65 73 | 20 66 6f 70 65 6e 28 29 |" causes| fopen()|
|000001b0| 20 69 73 20 70 72 6f 6d | 70 74 20 66 6f 72 20 61 | is prom|pt for a|
|000001c0| 20 66 69 6c 65 20 75 73 | 69 6e 67 20 74 68 65 20 | file us|ing the |
|000001d0| 53 74 61 6e 64 61 72 64 | 20 46 69 6c 65 20 67 65 |Standard| File ge|
|000001e0| 74 20 28 72 65 61 64 2f | 61 70 70 65 6e 64 20 61 |t (read/|append a|
|000001f0| 63 63 65 73 73 29 20 6f | 72 20 70 75 74 20 28 77 |ccess) o|r put (w|
|00000200| 72 69 74 65 20 61 63 63 | 65 73 73 29 20 64 69 61 |rite acc|ess) dia|
|00000210| 6c 6f 67 73 2e 20 54 68 | 69 73 20 73 61 76 65 73 |logs. Th|is saves|
|00000220| 20 74 68 65 20 75 73 65 | 72 20 63 61 6c 6c 69 6e | the use|r callin|
|00000230| 67 20 53 74 61 6e 64 61 | 72 64 20 46 69 6c 65 20 |g Standa|rd File |
|00000240| 74 68 65 6d 73 65 6c 76 | 65 73 2c 20 63 6f 6e 76 |themselv|es, conv|
|00000250| 65 72 74 69 6e 67 20 74 | 68 65 20 76 6f 6c 52 65 |erting t|he volRe|
|00000260| 66 2f 6e 61 6d 65 20 70 | 61 69 72 20 74 6f 20 61 |f/name p|air to a|
|00000270| 20 66 75 6c 6c 20 70 61 | 74 68 6e 61 6d 65 2c 20 | full pa|thname, |
|00000280| 61 6e 64 20 74 68 65 6e | 20 63 61 6c 6c 69 6e 67 |and then| calling|
|00000290| 20 66 6f 70 65 6e 28 29 | 2e 2e 2e 0d 2a 09 41 64 | fopen()|....*.Ad|
|000002a0| 64 65 64 20 66 64 6f 70 | 65 6e 28 29 20 61 6e 64 |ded fdop|en() and|
|000002b0| 20 66 64 72 65 6f 70 65 | 6e 28 29 20 72 6f 75 74 | fdreope|n() rout|
|000002c0| 69 6e 65 73 2e 0d 09 54 | 68 65 73 65 20 6d 69 6d |ines...T|hese mim|
|000002d0| 69 63 20 74 68 65 69 72 | 20 55 6e 69 78 20 63 6f |ic their| Unix co|
|000002e0| 75 6e 74 65 72 70 61 72 | 74 73 20 62 75 74 20 74 |unterpar|ts but t|
|000002f0| 61 6b 65 20 61 20 76 6f | 6c 75 6d 65 20 72 65 66 |ake a vo|lume ref|
|00000300| 65 72 65 6e 63 65 20 61 | 73 20 77 65 6c 6c 20 61 |erence a|s well a|
|00000310| 73 20 61 20 6e 61 6d 65 | 2e 0d 2a 09 41 64 64 65 |s a name|..*.Adde|
|00000320| 64 20 69 6e 20 61 73 6d | 7b 2e 2e 2e 7d 20 73 74 |d in asm|{...} st|
|00000330| 61 74 65 6d 65 6e 74 73 | 2e 0d 09 44 6f 65 73 6e |atements|...Doesn|
|00000340| 27 74 20 61 64 64 20 66 | 75 6e 63 74 69 6f 6e 61 |'t add f|unctiona|
|00000350| 6c 69 74 79 2c 20 6a 75 | 73 74 20 64 65 63 72 65 |lity, ju|st decre|
|00000360| 61 73 65 73 20 73 69 7a | 65 20 74 6f 20 6f 66 66 |ases siz|e to off|
|00000370| 73 65 74 20 69 6e 63 72 | 65 61 73 65 20 63 61 75 |set incr|ease cau|
|00000380| 73 65 64 20 62 79 20 6e | 65 77 20 63 6f 64 65 2e |sed by n|ew code.|
|00000390| 2e 2e 0d 0d 54 68 65 20 | 64 69 66 66 73 20 61 72 |....The |diffs ar|
|000003a0| 65 20 66 6f 72 20 74 68 | 65 20 66 69 6c 65 73 20 |e for th|e files |
|000003b0| 70 72 69 6e 74 66 2d 33 | 2e 63 2c 20 73 74 64 6f |printf-3|.c, stdo|
|000003c0| 70 65 6e 2e 63 20 61 6e | 64 20 73 74 64 69 6f 2e |pen.c an|d stdio.|
|000003d0| 68 2e 0d 0d 09 09 09 09 | 09 45 6e 6a 6f 79 2c 0d |h.......|.Enjoy,.|
|000003e0| 09 09 09 09 09 09 4e 69 | 67 65 6c 20 28 6e 70 40 |......Ni|gel (np@|
|000003f0| 64 6f 63 2e 69 63 2e 61 | 63 2e 75 6b 29 0d 0d 2a |doc.ic.a|c.uk)..*|
|00000400| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000410| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 09 |********|*******.|
|00000420| 0d 46 69 6c 65 6e 61 6d | 65 3a 20 20 70 72 69 6e |.Filenam|e:  prin|
|00000430| 74 66 2d 33 2e 63 2c 20 | 6e 65 77 20 66 69 6c 65 |tf-3.c, |new file|
|00000440| 2e 0d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..------|--------|
|00000450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000460| 2d 2d 0d 46 69 6c 65 6e | 61 6d 65 3a 20 20 70 72 |--.Filen|ame:  pr|
|00000470| 69 6e 74 66 2d 33 2e 63 | 2c 20 6f 72 69 67 69 6e |intf-3.c|, origin|
|00000480| 61 6c 20 66 69 6c 65 2e | 0d 0d 37 09 2a 2f 0d 38 |al file.|..7.*/.8|
|00000490| 09 2f 2a 0d 39 09 09 4d | 6f 64 69 66 69 65 64 20 |./*.9..M|odified |
|000004a0| 62 79 20 4e 69 67 65 6c | 20 50 65 72 72 79 2c 20 |by Nigel| Perry, |
|000004b0| 4d 61 79 20 31 39 38 39 | 0d 31 30 09 09 0d 31 31 |May 1989|.10...11|
|000004c0| 09 09 41 64 64 65 64 20 | 25 6b 20 61 6e 64 20 25 |..Added |%k and %|
|000004d0| 6c 6b 20 66 6f 72 6d 61 | 74 20 74 6f 20 70 72 69 |lk forma|t to pri|
|000004e0| 6e 74 20 77 6f 72 64 2f | 6c 6f 6e 67 73 20 61 73 |nt word/|longs as|
|000004f0| 20 63 68 61 72 61 63 74 | 65 72 73 0d 31 32 09 09 | charact|ers.12..|
|00000500| 43 6f 64 65 20 63 6f 6e | 74 72 6f 6c 6c 65 64 20 |Code con|trolled |
|00000510| 62 79 20 23 69 66 64 65 | 66 20 43 48 41 52 49 4e |by #ifde|f CHARIN|
|00000520| 54 0d 31 33 09 09 0d 31 | 34 09 09 a9 20 31 39 38 |T.13...1|4... 198|
|00000530| 39 2c 20 4e 69 67 65 6c | 20 50 65 72 72 79 0d 31 |9, Nigel| Perry.1|
|00000540| 35 09 20 2a 2f 0d 31 36 | 09 20 0d 31 37 09 2f 2a |5. */.16|. .17./*|
|00000550| 20 61 64 64 20 69 6e 20 | 25 6b 20 66 6f 72 6d 61 | add in |%k forma|
|00000560| 74 20 2a 2f 0d 31 38 09 | 23 64 65 66 69 6e 65 20 |t */.18.|#define |
|00000570| 43 48 41 52 49 4e 54 0d | 31 39 09 0d 2d 2d 2d 2d |CHARINT.|19..----|
|00000580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 37 09 2a |--------|----.7.*|
|000005a0| 2f 0d 38 09 0d 0d 32 32 | 09 0d 32 33 09 23 69 66 |/.8...22|..23.#if|
|000005b0| 6e 64 65 66 20 5f 73 74 | 64 69 6f 68 5f 0d 2d 2d |ndef _st|dioh_.--|
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 31 |--------|------.1|
|000005e0| 31 09 0d 31 32 09 23 69 | 6e 63 6c 75 64 65 20 22 |1..12.#i|nclude "|
|000005f0| 63 6f 6e 66 69 67 2e 68 | 22 0d 31 33 09 0d 31 34 |config.h|".13..14|
|00000600| 09 23 69 66 6e 64 65 66 | 20 5f 73 74 64 69 6f 68 |.#ifndef| _stdioh|
|00000610| 5f 0d 0d 32 38 37 09 7b | 0d 32 38 38 09 42 6f 6f |_..287.{|.288.Boo|
|00000620| 6c 65 61 6e 20 6c 65 66 | 74 5f 6a 75 73 74 69 66 |lean lef|t_justif|
|00000630| 79 3b 20 20 20 20 20 20 | 20 20 20 20 20 2f 2a 20 |y;      |     /* |
|00000640| 66 6c 61 67 20 74 6f 20 | 69 6e 64 69 63 61 74 65 |flag to |indicate|
|00000650| 20 6c 65 66 74 20 6a 75 | 73 74 69 66 69 63 61 74 | left ju|stificat|
|00000660| 69 6f 6e 20 2a 2f 0d 32 | 38 39 09 42 6f 6f 6c 65 |ion */.2|89.Boole|
|00000670| 61 6e 20 64 6f 5f 70 72 | 65 63 69 73 69 6f 6e 3b |an do_pr|ecision;|
|00000680| 20 20 20 20 20 20 20 20 | 20 20 20 2f 2a 20 66 6c |        |   /* fl|
|00000690| 61 67 20 6c 69 6d 69 74 | 65 64 20 70 72 65 63 69 |ag limit|ed preci|
|000006a0| 73 69 6f 6e 20 2a 2f 0d | 2d 2d 2d 2d 2d 2d 2d 2d |sion */.|--------|
|000006b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006c0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 32 37 38 09 7b 0d 32 |--------|.278.{.2|
|000006d0| 37 39 09 42 6f 6f 6c 65 | 61 6e 20 6c 65 66 74 5f |79.Boole|an left_|
|000006e0| 6a 75 73 74 69 66 79 3b | 20 20 20 20 20 20 20 20 |justify;|        |
|000006f0| 20 20 20 2f 2a 20 66 6c | 61 67 20 74 6f 20 69 6e |   /* fl|ag to in|
|00000700| 64 69 63 61 74 65 20 6c | 65 66 74 20 6a 75 73 74 |dicate l|eft just|
|00000710| 69 63 63 61 74 69 6f 6e | 20 2a 2f 0d 32 38 30 09 |iccation| */.280.|
|00000720| 42 6f 6f 6c 65 61 6e 20 | 64 6f 5f 70 72 65 63 69 |Boolean |do_preci|
|00000730| 73 69 6f 6e 3b 20 20 20 | 20 20 20 20 20 20 20 20 |sion;   |        |
|00000740| 2f 2a 20 66 6c 61 67 20 | 6c 69 6d 69 74 65 64 20 |/* flag |limited |
|00000750| 70 72 65 63 69 73 69 6f | 6e 20 2a 2f 0d 0d 36 33 |precisio|n */..63|
|00000760| 35 09 09 09 09 09 09 62 | 72 65 61 6b 3b 0d 36 33 |5......b|reak;.63|
|00000770| 36 09 23 69 66 64 65 66 | 20 43 48 41 52 49 4e 54 |6.#ifdef| CHARINT|
|00000780| 0d 36 33 37 09 09 09 63 | 61 73 65 20 27 6b 27 3a |.637...c|ase 'k':|
|00000790| 0d 36 33 38 09 09 09 09 | 7b 09 72 65 67 69 73 74 |.638....|{.regist|
|000007a0| 65 72 20 63 68 61 72 20 | 2a 61 72 67 5f 68 6f 6c |er char |*arg_hol|
|000007b0| 64 3b 0d 36 33 39 09 0d | 36 34 30 09 09 09 09 09 |d;.639..|640.....|
|000007c0| 6c 65 6e 67 74 68 20 3d | 20 69 74 73 5f 61 5f 6c |length =| its_a_l|
|000007d0| 6f 6e 67 20 3f 20 73 69 | 7a 65 6f 66 28 6c 6f 6e |ong ? si|zeof(lon|
|000007e0| 67 29 20 3a 20 73 69 7a | 65 6f 66 28 69 6e 74 29 |g) : siz|eof(int)|
|000007f0| 3b 0d 36 34 31 09 09 09 | 09 09 61 72 67 5f 68 6f |;.641...|..arg_ho|
|00000800| 6c 64 20 3d 20 61 72 67 | 75 6d 65 6e 74 20 2b 20 |ld = arg|ument + |
|00000810| 6c 65 6e 67 74 68 3b 0d | 36 34 32 09 09 09 09 09 |length;.|642.....|
|00000820| 69 66 20 28 64 6f 5f 70 | 72 65 63 69 73 69 6f 6e |if (do_p|recision|
|00000830| 20 26 26 20 6c 65 6e 67 | 74 68 20 3e 20 70 72 65 | && leng|th > pre|
|00000840| 63 69 73 69 6f 6e 29 20 | 6c 65 6e 67 74 68 20 3d |cision) |length =|
|00000850| 20 70 72 65 63 69 73 69 | 6f 6e 3b 0d 36 34 33 09 | precisi|on;.643.|
|00000860| 09 09 09 09 77 69 64 74 | 68 20 2d 3d 20 6c 65 6e |....widt|h -= len|
|00000870| 67 74 68 3b 0d 36 34 34 | 09 09 09 09 09 0d 36 34 |gth;.644|......64|
|00000880| 35 09 09 09 09 09 69 66 | 28 21 6c 65 66 74 5f 6a |5.....if|(!left_j|
|00000890| 75 73 74 69 66 79 29 20 | 70 61 64 64 28 42 4c 41 |ustify) |padd(BLA|
|000008a0| 4e 4b 53 2c 20 77 69 64 | 74 68 29 3b 0d 36 34 36 |NKS, wid|th);.646|
|000008b0| 09 09 09 09 09 77 68 69 | 6c 65 20 28 2d 2d 6c 65 |.....whi|le (--le|
|000008c0| 6e 67 74 68 20 3e 3d 20 | 30 29 0d 36 34 37 09 09 |ngth >= |0).647..|
|000008d0| 09 09 09 09 28 2a 6f 75 | 74 70 75 74 78 29 28 2a |....(*ou|tputx)(*|
|000008e0| 61 72 67 75 6d 65 6e 74 | 2b 2b 29 3b 0d 36 34 38 |argument|++);.648|
|000008f0| 09 09 09 09 09 69 66 28 | 6c 65 66 74 5f 6a 75 73 |.....if(|left_jus|
|00000900| 74 69 66 79 29 20 70 61 | 64 64 28 42 4c 41 4e 4b |tify) pa|dd(BLANK|
|00000910| 53 2c 20 77 69 64 74 68 | 29 3b 0d 36 34 39 09 0d |S, width|);.649..|
|00000920| 36 35 30 09 09 09 09 09 | 61 72 67 75 6d 65 6e 74 |650.....|argument|
|00000930| 20 3d 20 61 72 67 5f 68 | 6f 6c 64 3b 0d 36 35 31 | = arg_h|old;.651|
|00000940| 09 09 09 09 7d 0d 36 35 | 32 09 09 09 09 62 72 65 |....}.65|2....bre|
|00000950| 61 6b 3b 0d 36 35 33 09 | 23 65 6e 64 69 66 0d 36 |ak;.653.|#endif.6|
|00000960| 35 34 09 0d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |54..----|--------|
|00000970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000980| 2d 2d 2d 2d 0d 36 32 36 | 09 09 09 09 09 09 62 72 |----.626|......br|
|00000990| 65 61 6b 3b 0d 36 32 37 | 09 0d 0d 0d 34 20 6d 69 |eak;.627|....4 mi|
|000009a0| 73 6d 61 74 63 68 65 73 | 2e 0d 0d 2a 2a 2a 2a 2a |smatches|...*****|
|000009b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000009c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 09 0d 46 69 6c |********|***..Fil|
|000009d0| 65 6e 61 6d 65 3a 20 20 | 73 74 64 6f 70 65 6e 2e |ename:  |stdopen.|
|000009e0| 63 2c 20 6e 65 77 20 66 | 69 6c 65 2e 0d 2d 2d 2d |c, new f|ile..---|
|000009f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 46 69 |--------|-----.Fi|
|00000a10| 6c 65 6e 61 6d 65 3a 20 | 20 73 74 64 6f 70 65 6e |lename: | stdopen|
|00000a20| 2e 63 2c 20 6f 72 69 67 | 69 6e 61 6c 20 66 69 6c |.c, orig|inal fil|
|00000a30| 65 2e 0d 0d 35 09 2a 2f | 0d 36 09 2f 2a 0d 37 09 |e...5.*/|.6./*.7.|
|00000a40| 09 4d 6f 64 69 66 69 65 | 64 20 62 79 20 4e 69 67 |.Modifie|d by Nig|
|00000a50| 65 6c 20 50 65 72 72 79 | 2c 20 4d 61 79 20 31 39 |el Perry|, May 19|
|00000a60| 38 39 0d 38 09 09 0d 39 | 09 09 41 64 64 65 64 20 |89.8...9|..Added |
|00000a70| 6e 65 77 20 22 64 72 69 | 76 65 72 22 20 6e 61 6d |new "dri|ver" nam|
|00000a80| 65 20 22 2e 53 46 22 20 | 77 68 69 63 68 20 75 73 |e ".SF" |which us|
|00000a90| 65 73 20 74 68 65 20 53 | 74 61 6e 64 61 72 64 20 |es the S|tandard |
|00000aa0| 46 69 6c 65 20 50 61 63 | 6b 61 67 65 0d 31 30 09 |File Pac|kage.10.|
|00000ab0| 09 74 6f 20 73 65 6c 65 | 63 74 20 61 20 66 69 6c |.to sele|ct a fil|
|00000ac0| 65 2e 0d 31 31 09 09 0d | 31 32 09 09 41 6c 6c 20 |e..11...|12..All |
|00000ad0| 2e 53 46 20 63 6f 64 65 | 20 23 69 66 64 65 66 27 |.SF code| #ifdef'|
|00000ae0| 65 64 20 62 79 20 53 54 | 44 46 49 4c 45 0d 31 33 |ed by ST|DFILE.13|
|00000af0| 09 09 0d 31 34 09 09 41 | 64 64 65 64 20 66 64 6f |...14..A|dded fdo|
|00000b00| 70 65 6e 28 29 20 61 6e | 64 20 66 64 72 65 6f 70 |pen() an|d fdreop|
|00000b10| 65 6e 28 29 20 72 6f 75 | 74 69 6e 65 73 20 74 6f |en() rou|tines to|
|00000b20| 20 6f 70 65 6e 20 66 69 | 6c 65 73 20 67 69 76 65 | open fi|les give|
|00000b30| 6e 0d 31 35 09 09 76 6f | 6c 75 6d 65 20 72 65 66 |n.15..vo|lume ref|
|00000b40| 65 72 65 6e 63 65 20 61 | 6e 64 20 6e 61 6d 65 2e |erence a|nd name.|
|00000b50| 0d 31 36 09 09 0d 31 37 | 09 09 41 6c 6c 20 66 64 |.16...17|..All fd|
|00000b60| 6f 70 65 6e 28 29 20 63 | 6f 64 65 20 23 69 66 64 |open() c|ode #ifd|
|00000b70| 65 66 27 65 64 20 62 79 | 20 46 44 4f 50 45 4e 0d |ef'ed by| FDOPEN.|
|00000b80| 31 38 09 09 0d 31 39 09 | 09 41 64 64 65 64 20 69 |18...19.|.Added i|
|00000b90| 6e 6c 69 6e 65 20 74 72 | 61 70 73 2e 20 41 6c 6c |nline tr|aps. All|
|00000ba0| 20 61 73 6d 20 63 6f 64 | 65 20 23 69 66 64 65 66 | asm cod|e #ifdef|
|00000bb0| 27 65 64 20 62 79 20 55 | 53 45 41 53 4d 0d 32 30 |'ed by U|SEASM.20|
|00000bc0| 09 09 0d 32 31 09 09 a9 | 20 31 39 38 39 2c 20 4e |...21...| 1989, N|
|00000bd0| 69 67 65 6c 20 50 65 72 | 72 79 0d 32 32 09 20 2a |igel Per|ry.22. *|
|00000be0| 2f 0d 32 33 09 20 0d 32 | 34 09 2f 2a 20 69 66 20 |/.23. .2|4./* if |
|00000bf0| 64 65 66 69 6e 65 64 20 | 77 69 6c 6c 20 69 6e 63 |defined |will inc|
|00000c00| 6c 75 64 65 20 6e 65 77 | 20 22 2e 53 46 22 20 22 |lude new| ".SF" "|
|00000c10| 64 72 69 76 65 72 22 20 | 2a 2f 0d 32 35 09 23 64 |driver" |*/.25.#d|
|00000c20| 65 66 69 6e 65 20 53 54 | 44 46 49 4c 45 0d 32 36 |efine ST|DFILE.26|
|00000c30| 09 2f 2a 20 69 66 20 64 | 65 66 69 6e 65 64 20 77 |./* if d|efined w|
|00000c40| 69 6c 6c 20 69 6e 63 6c | 75 64 65 20 66 64 6f 70 |ill incl|ude fdop|
|00000c50| 65 6e 28 29 20 63 6f 64 | 65 20 2a 2f 0d 32 37 09 |en() cod|e */.27.|
|00000c60| 23 64 65 66 69 6e 65 20 | 46 44 4f 50 45 4e 0d 32 |#define |FDOPEN.2|
|00000c70| 38 09 2f 2a 20 64 6f 20 | 74 72 61 70 20 63 61 6c |8./* do |trap cal|
|00000c80| 6c 73 20 69 6e 6c 69 6e | 65 20 2a 2f 0d 32 39 09 |ls inlin|e */.29.|
|00000c90| 23 64 65 66 69 6e 65 20 | 55 53 45 41 53 4d 0d 33 |#define |USEASM.3|
|00000ca0| 30 09 0d 33 31 09 23 69 | 66 6e 64 65 66 20 5f 73 |0..31.#i|fndef _s|
|00000cb0| 74 64 69 6f 68 5f 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |tdioh_.-|--------|
|00000cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cd0| 2d 2d 2d 2d 2d 2d 2d 0d | 35 09 2a 2f 0d 36 09 20 |-------.|5.*/.6. |
|00000ce0| 0d 37 09 23 69 66 6e 64 | 65 66 20 5f 73 74 64 69 |.7.#ifnd|ef _stdi|
|00000cf0| 6f 68 5f 0d 0d 34 32 09 | 0d 34 33 09 23 69 66 64 |oh_..42.|.43.#ifd|
|00000d00| 65 66 20 55 53 45 41 53 | 4d 0d 34 34 09 23 69 6e |ef USEAS|M.44.#in|
|00000d10| 63 6c 75 64 65 20 3c 61 | 73 6d 2e 68 3e 0d 34 35 |clude <a|sm.h>.45|
|00000d20| 09 23 65 6e 64 69 66 0d | 34 36 09 0d 34 37 09 23 |.#endif.|46..47.#|
|00000d30| 69 66 64 65 66 20 53 54 | 44 46 49 4c 45 0d 34 38 |ifdef ST|DFILE.48|
|00000d40| 09 23 69 66 6e 64 65 66 | 09 5f 53 74 64 46 69 6c |.#ifndef|._StdFil|
|00000d50| 65 50 6b 67 5f 0d 34 39 | 09 23 69 6e 63 6c 75 64 |ePkg_.49|.#includ|
|00000d60| 65 20 3c 53 74 64 46 69 | 6c 65 50 6b 67 2e 68 3e |e <StdFi|lePkg.h>|
|00000d70| 0d 35 30 09 23 65 6e 64 | 69 66 0d 35 31 09 0d 35 |.50.#end|if.51..5|
|00000d80| 32 09 2f 2a 20 22 50 6f | 69 6e 74 22 20 74 6f 20 |2./* "Po|int" to |
|00000d90| 70 6c 61 63 65 20 64 69 | 61 6c 6f 67 20 2a 2f 0d |place di|alog */.|
|00000da0| 35 33 09 23 64 65 66 69 | 6e 65 20 47 45 54 57 48 |53.#defi|ne GETWH|
|00000db0| 45 52 45 20 30 78 30 30 | 34 37 30 30 35 32 4c 0d |ERE 0x00|470052L.|
|00000dc0| 35 34 09 23 64 65 66 69 | 6e 65 20 50 55 54 57 48 |54.#defi|ne PUTWH|
|00000dd0| 45 52 45 20 30 78 30 30 | 34 66 30 30 36 38 4c 0d |ERE 0x00|4f0068L.|
|00000de0| 35 35 09 23 64 65 66 69 | 6e 65 20 4e 49 4c 20 28 |55.#defi|ne NIL (|
|00000df0| 76 6f 69 64 20 2a 29 30 | 0d 35 36 09 23 64 65 66 |void *)0|.56.#def|
|00000e00| 69 6e 65 20 45 4d 50 54 | 59 20 28 28 63 68 61 72 |ine EMPT|Y ((char|
|00000e10| 20 2a 29 30 78 41 30 32 | 29 09 09 2f 2a 20 6c 6f | *)0xA02|)../* lo|
|00000e20| 77 20 6d 65 6d 6f 72 79 | 20 67 6c 6f 62 61 6c 20 |w memory| global |
|00000e30| 4f 6e 65 4f 6e 65 20 2a | 2f 0d 35 37 09 09 09 09 |OneOne *|/.57....|
|00000e40| 09 09 09 09 09 09 2f 2a | 20 75 73 65 64 20 66 6f |....../*| used fo|
|00000e50| 72 20 22 22 20 61 6e 64 | 20 22 5c 70 22 20 2a 2f |r "" and| "\p" */|
|00000e60| 0d 35 38 09 0d 35 39 09 | 23 65 6e 64 69 66 0d 36 |.58..59.|#endif.6|
|00000e70| 30 09 0d 36 31 09 73 74 | 61 74 69 63 20 42 6f 6f |0..61.st|atic Boo|
|00000e80| 6c 65 61 6e 20 5f 65 78 | 69 74 69 6e 67 5f 63 6c |lean _ex|iting_cl|
|00000e90| 6f 73 65 61 6c 6c 5f 66 | 6c 61 67 20 3d 20 66 61 |oseall_f|lag = fa|
|00000ea0| 6c 73 65 3b 0d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |lse;.---|--------|
|00000eb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ec0| 2d 2d 2d 2d 2d 0d 31 38 | 09 0d 31 39 09 73 74 61 |-----.18|..19.sta|
|00000ed0| 74 69 63 20 42 6f 6f 6c | 65 61 6e 20 5f 65 78 69 |tic Bool|ean _exi|
|00000ee0| 74 69 6e 67 5f 63 6c 6f | 73 65 61 6c 6c 5f 66 6c |ting_clo|seall_fl|
|00000ef0| 61 67 20 3d 20 66 61 6c | 73 65 3b 0d 0d 36 36 09 |ag = fal|se;..66.|
|00000f00| 23 6c 69 6e 65 20 30 20 | 78 66 6f 70 65 6e 0d 36 |#line 0 |xfopen.6|
|00000f10| 37 09 23 69 66 64 65 66 | 20 46 44 4f 50 45 4e 0d |7.#ifdef| FDOPEN.|
|00000f20| 36 38 09 73 74 61 74 69 | 63 20 46 49 4c 45 09 2a |68.stati|c FILE.*|
|00000f30| 78 66 6f 70 65 6e 28 76 | 6f 6c 72 65 66 2c 6e 61 |xfopen(v|olref,na|
|00000f40| 6d 65 70 74 72 2c 74 79 | 70 65 2c 77 68 6f 29 0d |meptr,ty|pe,who).|
|00000f50| 36 39 09 69 6e 74 20 76 | 6f 6c 72 65 66 3b 0d 37 |69.int v|olref;.7|
|00000f60| 30 09 23 65 6c 73 65 0d | 37 31 09 73 74 61 74 69 |0.#else.|71.stati|
|00000f70| 63 20 46 49 4c 45 09 2a | 78 66 6f 70 65 6e 28 6e |c FILE.*|xfopen(n|
|00000f80| 61 6d 65 70 74 72 2c 74 | 79 70 65 2c 77 68 6f 29 |ameptr,t|ype,who)|
|00000f90| 0d 37 32 09 23 65 6e 64 | 69 66 0d 37 33 09 63 68 |.72.#end|if.73.ch|
|00000fa0| 61 72 09 2a 6e 61 6d 65 | 70 74 72 3b 0d 2d 2d 2d |ar.*name|ptr;.---|
|00000fb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000fc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 32 34 |--------|-----.24|
|00000fd0| 09 23 6c 69 6e 65 20 30 | 20 78 66 6f 70 65 6e 0d |.#line 0| xfopen.|
|00000fe0| 32 35 09 73 74 61 74 69 | 63 20 46 49 4c 45 09 2a |25.stati|c FILE.*|
|00000ff0| 78 66 6f 70 65 6e 28 6e | 61 6d 65 70 74 72 2c 74 |xfopen(n|ameptr,t|
|00001000| 79 70 65 2c 77 68 6f 29 | 0d 32 36 09 63 68 61 72 |ype,who)|.26.char|
|00001010| 09 2a 6e 61 6d 65 70 74 | 72 3b 0d 0d 38 39 09 09 |.*namept|r;..89..|
|00001020| 72 65 67 69 73 74 65 72 | 20 50 74 72 09 70 3b 0d |register| Ptr.p;.|
|00001030| 39 30 09 23 69 66 64 65 | 66 20 53 54 44 46 49 4c |90.#ifde|f STDFIL|
|00001040| 45 0d 39 31 09 09 53 46 | 52 65 70 6c 79 20 72 65 |E.91..SF|Reply re|
|00001050| 70 6c 79 3b 0d 39 32 09 | 09 53 46 54 79 70 65 4c |ply;.92.|.SFTypeL|
|00001060| 69 73 74 20 74 79 70 65 | 73 3b 0d 39 33 09 09 42 |ist type|s;.93..B|
|00001070| 6f 6f 6c 65 61 6e 09 53 | 46 64 72 69 76 65 72 20 |oolean.S|Fdriver |
|00001080| 3d 20 66 61 6c 73 65 3b | 0d 39 34 09 23 65 6e 64 |= false;|.94.#end|
|00001090| 69 66 0d 39 35 09 23 69 | 66 64 65 66 20 46 44 4f |if.95.#i|fdef FDO|
|000010a0| 50 45 4e 0d 39 36 09 09 | 42 6f 6f 6c 65 61 6e 20 |PEN.96..|Boolean |
|000010b0| 46 44 6f 70 65 6e 20 3d | 20 66 61 6c 73 65 3b 0d |FDopen =| false;.|
|000010c0| 39 37 09 23 65 6e 64 69 | 66 0d 39 38 09 0d 2d 2d |97.#endi|f.98..--|
|000010d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 34 |--------|------.4|
|000010f0| 32 09 09 72 65 67 69 73 | 74 65 72 20 50 74 72 09 |2..regis|ter Ptr.|
|00001100| 70 3b 0d 34 33 09 0d 0d | 31 35 37 09 0d 31 35 38 |p;.43...|157..158|
|00001110| 09 23 69 66 6e 64 65 66 | 20 53 54 44 46 49 4c 45 |.#ifndef| STDFILE|
|00001120| 0d 31 35 39 09 23 69 66 | 64 65 66 20 46 44 4f 50 |.159.#if|def FDOP|
|00001130| 45 4e 0d 31 36 30 09 09 | 69 66 28 76 6f 6c 72 65 |EN.160..|if(volre|
|00001140| 66 20 21 3d 20 30 29 0d | 31 36 31 09 09 09 46 44 |f != 0).|161...FD|
|00001150| 6f 70 65 6e 20 3d 20 74 | 72 75 65 3b 0d 31 36 32 |open = t|rue;.162|
|00001160| 09 09 65 6c 73 65 0d 31 | 36 33 09 23 65 6e 64 69 |..else.1|63.#endi|
|00001170| 66 0d 31 36 34 09 09 09 | 43 74 6f 50 73 74 72 28 |f.164...|CtoPstr(|
|00001180| 6e 61 6d 65 70 74 72 29 | 3b 0d 31 36 35 09 23 65 |nameptr)|;.165.#e|
|00001190| 6c 73 65 0d 31 36 36 09 | 23 69 66 64 65 66 20 46 |lse.166.|#ifdef F|
|000011a0| 44 4f 50 45 4e 0d 31 36 | 37 09 09 69 66 28 76 6f |DOPEN.16|7..if(vo|
|000011b0| 6c 72 65 66 20 21 3d 20 | 30 29 0d 31 36 38 09 09 |lref != |0).168..|
|000011c0| 09 46 44 6f 70 65 6e 20 | 3d 20 74 72 75 65 3b 0d |.FDopen |= true;.|
|000011d0| 31 36 39 09 09 65 6c 73 | 65 0d 31 37 30 09 23 65 |169..els|e.170.#e|
|000011e0| 6e 64 69 66 0d 31 37 31 | 09 09 2f 2a 20 49 20 77 |ndif.171|../* I w|
|000011f0| 6f 75 6c 64 20 75 73 65 | 20 2a 28 28 6c 6f 6e 67 |ould use| *((long|
|00001200| 20 2a 29 6e 61 6d 65 70 | 74 72 29 20 3d 3d 20 27 | *)namep|tr) == '|
|00001210| 2e 53 46 5c 30 27 20 69 | 66 20 69 74 20 77 65 72 |.SF\0' i|f it wer|
|00001220| 65 20 61 6c 69 67 6e 65 | 64 2e 2e 2e 20 2a 2f 0d |e aligne|d... */.|
|00001230| 31 37 32 09 09 69 66 28 | 20 6e 61 6d 65 70 74 72 |172..if(| nameptr|
|00001240| 5b 30 5d 20 3d 3d 20 27 | 2e 27 20 26 26 20 6e 61 |[0] == '|.' && na|
|00001250| 6d 65 70 74 72 5b 31 5d | 20 3d 3d 20 27 53 27 0d |meptr[1]| == 'S'.|
|00001260| 31 37 33 09 09 20 26 26 | 20 6e 61 6d 65 70 74 72 |173.. &&| nameptr|
|00001270| 5b 32 5d 20 3d 3d 20 27 | 46 27 20 26 26 20 6e 61 |[2] == '|F' && na|
|00001280| 6d 65 70 74 72 5b 33 5d | 20 3d 3d 20 27 5c 30 27 |meptr[3]| == '\0'|
|00001290| 20 29 0d 31 37 34 09 09 | 7b 09 53 46 64 72 69 76 | ).174..|{.SFdriv|
|000012a0| 65 72 20 3d 20 74 72 75 | 65 3b 0d 31 37 35 09 09 |er = tru|e;.175..|
|000012b0| 09 69 66 28 21 63 72 65 | 61 74 65 20 7c 7c 20 61 |.if(!cre|ate || a|
|000012c0| 64 64 29 0d 31 37 36 09 | 09 09 09 53 46 47 65 74 |dd).176.|...SFGet|
|000012d0| 46 69 6c 65 28 47 45 54 | 57 48 45 52 45 2c 20 45 |File(GET|WHERE, E|
|000012e0| 4d 50 54 59 2c 20 4e 49 | 4c 2c 20 2d 31 2c 20 74 |MPTY, NI|L, -1, t|
|000012f0| 79 70 65 73 2c 20 4e 49 | 4c 2c 20 26 72 65 70 6c |ypes, NI|L, &repl|
|00001300| 79 29 3b 0d 31 37 37 09 | 09 09 65 6c 73 65 0d 31 |y);.177.|..else.1|
|00001310| 37 38 09 09 09 09 53 46 | 50 75 74 46 69 6c 65 28 |78....SF|PutFile(|
|00001320| 50 55 54 57 48 45 52 45 | 2c 20 45 4d 50 54 59 2c |PUTWHERE|, EMPTY,|
|00001330| 20 45 4d 50 54 59 2c 20 | 4e 49 4c 2c 20 26 72 65 | EMPTY, |NIL, &re|
|00001340| 70 6c 79 29 3b 0d 31 37 | 39 09 09 09 69 66 28 21 |ply);.17|9...if(!|
|00001350| 72 65 70 6c 79 2e 67 6f | 6f 64 29 0d 31 38 30 09 |reply.go|od).180.|
|00001360| 09 09 7b 09 65 72 72 6e | 6f 20 3d 20 62 64 4e 61 |..{.errn|o = bdNa|
|00001370| 6d 45 72 72 3b 0d 31 38 | 31 09 09 09 09 72 65 74 |mErr;.18|1....ret|
|00001380| 75 72 6e 28 4e 55 4c 4c | 29 3b 0d 31 38 32 09 09 |urn(NULL|);.182..|
|00001390| 09 7d 0d 31 38 33 09 09 | 7d 0d 31 38 34 09 09 65 |.}.183..|}.184..e|
|000013a0| 6c 73 65 0d 31 38 35 09 | 09 09 43 74 6f 50 73 74 |lse.185.|..CtoPst|
|000013b0| 72 28 6e 61 6d 65 70 74 | 72 29 3b 0d 31 38 36 09 |r(namept|r);.186.|
|000013c0| 23 65 6e 64 69 66 0d 31 | 38 37 09 0d 31 38 38 09 |#endif.1|87..188.|
|000013d0| 23 69 66 6e 64 65 66 20 | 55 53 45 41 53 4d 0d 31 |#ifndef |USEASM.1|
|000013e0| 38 39 09 09 70 20 3d 20 | 4e 65 77 50 74 72 28 28 |89..p = |NewPtr((|
|000013f0| 6c 6f 6e 67 29 42 55 46 | 53 49 5a 29 3b 0d 31 39 |long)BUF|SIZ);.19|
|00001400| 30 09 23 65 6c 73 65 0d | 31 39 31 09 09 61 73 6d |0.#else.|191..asm|
|00001410| 0d 31 39 32 09 09 7b 09 | 6d 6f 76 65 2e 6c 09 09 |.192..{.|move.l..|
|00001420| 23 42 55 46 53 49 5a 2c | 64 30 0d 31 39 33 09 09 |#BUFSIZ,|d0.193..|
|00001430| 09 5f 4e 65 77 50 74 72 | 0d 31 39 34 09 09 09 6d |._NewPtr|.194...m|
|00001440| 6f 76 65 61 2e 6c 09 09 | 61 30 2c 70 0d 31 39 35 |ovea.l..|a0,p.195|
|00001450| 09 09 7d 0d 31 39 36 09 | 23 65 6e 64 69 66 0d 31 |..}.196.|#endif.1|
|00001460| 39 37 09 0d 31 39 38 09 | 09 64 6f 09 7b 0d 31 39 |97..198.|.do.{.19|
|00001470| 39 09 0d 32 30 30 09 23 | 69 66 64 65 66 20 53 54 |9..200.#|ifdef ST|
|00001480| 44 46 49 4c 45 0d 32 30 | 31 09 09 09 69 66 28 21 |DFILE.20|1...if(!|
|00001490| 53 46 64 72 69 76 65 72 | 29 0d 32 30 32 09 09 09 |SFdriver|).202...|
|000014a0| 7b 0d 32 30 33 09 23 65 | 6e 64 69 66 0d 32 30 34 |{.203.#e|ndif.204|
|000014b0| 09 23 69 66 64 65 66 20 | 46 44 4f 50 45 4e 0d 32 |.#ifdef |FDOPEN.2|
|000014c0| 30 35 09 09 09 09 69 66 | 28 21 46 44 6f 70 65 6e |05....if|(!FDopen|
|000014d0| 29 0d 32 30 36 09 09 09 | 09 7b 0d 32 30 37 09 23 |).206...|.{.207.#|
|000014e0| 65 6e 64 69 66 09 0d 32 | 30 38 09 09 09 09 09 2f |endif..2|08...../|
|000014f0| 2a 20 70 64 67 20 37 2f | 32 39 2f 38 36 20 2d 20 |* pdg 7/|29/86 - |
|00001500| 6c 6f 6f 6b 20 6f 6e 6c | 79 20 76 69 61 20 64 65 |look onl|y via de|
|00001510| 66 61 75 6c 74 20 70 61 | 74 68 20 2a 2f 0d 32 30 |fault pa|th */.20|
|00001520| 39 09 09 09 09 09 70 62 | 2e 69 6f 4e 61 6d 65 50 |9.....pb|.ioNameP|
|00001530| 74 72 09 3d 20 30 3b 0d | 32 31 30 09 23 69 66 6e |tr.= 0;.|210.#ifn|
|00001540| 64 65 66 20 55 53 45 41 | 53 4d 0d 32 31 31 09 09 |def USEA|SM.211..|
|00001550| 09 09 09 69 66 20 28 50 | 42 47 65 74 56 6f 6c 28 |...if (P|BGetVol(|
|00001560| 26 70 62 2c 20 66 61 6c | 73 65 29 29 20 70 62 2e |&pb, fal|se)) pb.|
|00001570| 69 6f 56 52 65 66 4e 75 | 6d 09 3d 20 30 3b 0d 32 |ioVRefNu|m.= 0;.2|
|00001580| 31 32 09 23 65 6c 73 65 | 0d 32 31 33 09 09 09 09 |12.#else|.213....|
|00001590| 09 61 73 6d 0d 32 31 34 | 09 09 09 09 09 7b 09 6c |.asm.214|.....{.l|
|000015a0| 65 61 09 09 70 62 2c 61 | 30 0d 32 31 35 09 09 09 |ea..pb,a|0.215...|
|000015b0| 09 09 09 5f 50 42 47 65 | 74 56 6f 6c 0d 32 31 36 |..._PBGe|tVol.216|
|000015c0| 09 09 09 09 09 09 62 65 | 71 2e 73 09 40 32 0d 32 |......be|q.s.@2.2|
|000015d0| 31 37 09 09 09 09 09 09 | 63 6c 72 2e 77 09 70 62 |17......|clr.w.pb|
|000015e0| 2e 69 6f 56 52 65 66 4e | 75 6d 0d 32 31 38 09 09 |.ioVRefN|um.218..|
|000015f0| 09 09 09 40 32 0d 32 31 | 39 09 09 09 09 09 7d 0d |...@2.21|9.....}.|
|00001600| 32 32 30 09 23 65 6e 64 | 69 66 0d 32 32 31 09 23 |220.#end|if.221.#|
|00001610| 69 66 64 65 66 20 46 44 | 4f 50 45 4e 0d 32 32 32 |ifdef FD|OPEN.222|
|00001620| 09 09 09 09 7d 0d 32 32 | 33 09 09 09 09 65 6c 73 |....}.22|3....els|
|00001630| 65 0d 32 32 34 09 09 09 | 09 09 70 62 2e 69 6f 56 |e.224...|..pb.ioV|
|00001640| 52 65 66 4e 75 6d 20 3d | 20 76 6f 6c 72 65 66 3b |RefNum =| volref;|
|00001650| 0d 32 32 35 09 23 65 6e | 64 69 66 09 0d 32 32 36 |.225.#en|dif..226|
|00001660| 09 09 09 09 70 62 2e 69 | 6f 4e 61 6d 65 50 74 72 |....pb.i|oNamePtr|
|00001670| 09 3d 20 28 53 74 72 69 | 6e 67 50 74 72 29 6e 61 |.= (Stri|ngPtr)na|
|00001680| 6d 65 70 74 72 3b 0d 32 | 32 37 09 23 69 66 64 65 |meptr;.2|27.#ifde|
|00001690| 66 20 53 54 44 46 49 4c | 45 0d 32 32 38 09 09 09 |f STDFIL|E.228...|
|000016a0| 7d 0d 32 32 39 09 09 09 | 65 6c 73 65 0d 32 33 30 |}.229...|else.230|
|000016b0| 09 09 09 7b 09 70 62 2e | 69 6f 4e 61 6d 65 50 74 |...{.pb.|ioNamePt|
|000016c0| 72 20 3d 20 28 53 74 72 | 69 6e 67 50 74 72 29 26 |r = (Str|ingPtr)&|
|000016d0| 72 65 70 6c 79 2e 66 4e | 61 6d 65 3b 0d 32 33 31 |reply.fN|ame;.231|
|000016e0| 09 09 09 09 70 62 2e 69 | 6f 56 52 65 66 4e 75 6d |....pb.i|oVRefNum|
|000016f0| 20 3d 20 72 65 70 6c 79 | 2e 76 52 65 66 4e 75 6d | = reply|.vRefNum|
|00001700| 3b 0d 32 33 32 09 09 09 | 7d 0d 32 33 33 09 23 65 |;.232...|}.233.#e|
|00001710| 6e 64 69 66 0d 32 33 34 | 09 09 09 70 62 2e 69 6f |ndif.234|...pb.io|
|00001720| 56 65 72 73 4e 75 6d 09 | 3d 20 30 3b 0d 2d 2d 2d |VersNum.|= 0;.---|
|00001730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001740| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 31 30 |--------|-----.10|
|00001750| 32 09 0d 31 30 33 09 09 | 43 74 6f 50 73 74 72 28 |2..103..|CtoPstr(|
|00001760| 6e 61 6d 65 70 74 72 29 | 3b 0d 31 30 34 09 0d 31 |nameptr)|;.104..1|
|00001770| 30 35 09 09 70 20 3d 20 | 4e 65 77 50 74 72 28 28 |05..p = |NewPtr((|
|00001780| 6c 6f 6e 67 29 42 55 46 | 53 49 5a 29 3b 0d 31 30 |long)BUF|SIZ);.10|
|00001790| 36 09 0d 31 30 37 09 09 | 64 6f 09 7b 0d 31 30 38 |6..107..|do.{.108|
|000017a0| 09 09 0d 31 30 39 09 09 | 09 2f 2a 20 70 64 67 20 |...109..|./* pdg |
|000017b0| 37 2f 32 39 2f 38 36 20 | 2d 20 6c 6f 6f 6b 20 6f |7/29/86 |- look o|
|000017c0| 6e 6c 79 20 76 69 61 20 | 64 65 66 61 75 6c 74 20 |nly via |default |
|000017d0| 70 61 74 68 20 2a 2f 0d | 31 31 30 09 0d 31 31 31 |path */.|110..111|
|000017e0| 09 09 09 70 62 2e 69 6f | 4e 61 6d 65 50 74 72 09 |...pb.io|NamePtr.|
|000017f0| 3d 20 30 3b 0d 31 31 32 | 09 09 09 69 66 20 28 50 |= 0;.112|...if (P|
|00001800| 42 47 65 74 56 6f 6c 28 | 26 70 62 2c 20 66 61 6c |BGetVol(|&pb, fal|
|00001810| 73 65 29 29 20 70 62 2e | 69 6f 56 52 65 66 4e 75 |se)) pb.|ioVRefNu|
|00001820| 6d 09 3d 20 30 3b 0d 31 | 31 33 09 0d 31 31 34 09 |m.= 0;.1|13..114.|
|00001830| 0d 31 31 35 09 09 09 70 | 62 2e 69 6f 4e 61 6d 65 |.115...p|b.ioName|
|00001840| 50 74 72 09 3d 20 28 53 | 74 72 69 6e 67 50 74 72 |Ptr.= (S|tringPtr|
|00001850| 29 6e 61 6d 65 70 74 72 | 3b 0d 31 31 36 09 09 09 |)nameptr|;.116...|
|00001860| 70 62 2e 69 6f 56 65 72 | 73 4e 75 6d 09 3d 20 30 |pb.ioVer|sNum.= 0|
|00001870| 3b 0d 0d 32 33 37 09 0d | 32 33 38 09 23 69 66 6e |;..237..|238.#ifn|
|00001880| 64 65 66 20 55 53 45 41 | 53 4d 0d 32 33 39 09 09 |def USEA|SM.239..|
|00001890| 09 6e 65 77 20 3d 20 50 | 42 4f 70 65 6e 28 26 70 |.new = P|BOpen(&p|
|000018a0| 62 2c 66 61 6c 73 65 29 | 3b 0d 32 34 30 09 23 65 |b,false)|;.240.#e|
|000018b0| 6c 73 65 0d 32 34 31 09 | 09 09 61 73 6d 0d 32 34 |lse.241.|..asm.24|
|000018c0| 32 09 09 09 7b 09 6c 65 | 61 09 09 70 62 2c 61 30 |2...{.le|a..pb,a0|
|000018d0| 0d 32 34 33 09 09 09 09 | 5f 50 42 4f 70 65 6e 0d |.243....|_PBOpen.|
|000018e0| 32 34 34 09 09 09 09 6d | 6f 76 65 2e 77 09 64 30 |244....m|ove.w.d0|
|000018f0| 2c 6e 65 77 0d 32 34 35 | 09 09 09 7d 0d 32 34 36 |,new.245|...}.246|
|00001900| 09 23 65 6e 64 69 66 0d | 32 34 37 09 0d 32 34 38 |.#endif.|247..248|
|00001910| 09 09 09 69 66 20 28 28 | 6e 65 77 20 3d 3d 20 66 |...if ((|new == f|
|00001920| 6e 66 45 72 72 29 20 26 | 26 20 28 63 72 65 61 74 |nfErr) &|& (creat|
|00001930| 65 29 29 0d 32 34 39 09 | 09 09 09 7b 0d 32 35 30 |e)).249.|...{.250|
|00001940| 09 23 69 66 6e 64 65 66 | 20 55 53 45 41 53 4d 0d |.#ifndef| USEASM.|
|00001950| 32 35 31 09 09 09 09 69 | 66 20 28 65 72 72 20 3d |251....i|f (err =|
|00001960| 20 28 50 42 43 72 65 61 | 74 65 28 26 70 62 2c 66 | (PBCrea|te(&pb,f|
|00001970| 61 6c 73 65 29 29 29 20 | 67 6f 74 6f 20 65 72 72 |alse))) |goto err|
|00001980| 5f 65 78 69 74 3b 0d 32 | 35 32 09 23 65 6c 73 65 |_exit;.2|52.#else|
|00001990| 0d 32 35 33 09 09 09 09 | 61 73 6d 0d 32 35 34 09 |.253....|asm.254.|
|000019a0| 09 09 09 7b 09 6c 65 61 | 09 09 70 62 2c 61 30 0d |...{.lea|..pb,a0.|
|000019b0| 32 35 35 09 09 09 09 09 | 5f 50 42 43 72 65 61 74 |255.....|_PBCreat|
|000019c0| 65 0d 32 35 36 09 09 09 | 09 09 62 6e 65 09 09 40 |e.256...|..bne..@|
|000019d0| 65 72 72 5f 65 78 69 74 | 0d 32 35 37 09 09 09 09 |err_exit|.257....|
|000019e0| 7d 0d 32 35 38 09 23 65 | 6e 64 69 66 0d 32 35 39 |}.258.#e|ndif.259|
|000019f0| 09 0d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..------|--------|
|00001a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a10| 2d 2d 0d 31 31 39 09 0d | 31 32 30 09 09 09 6e 65 |--.119..|120...ne|
|00001a20| 77 20 3d 20 50 42 4f 70 | 65 6e 28 26 70 62 2c 66 |w = PBOp|en(&pb,f|
|00001a30| 61 6c 73 65 29 3b 0d 31 | 32 31 09 09 09 0d 31 32 |alse);.1|21....12|
|00001a40| 32 09 09 09 69 66 20 28 | 28 6e 65 77 20 3d 3d 20 |2...if (|(new == |
|00001a50| 66 6e 66 45 72 72 29 20 | 26 26 20 28 63 72 65 61 |fnfErr) |&& (crea|
|00001a60| 74 65 29 29 0d 31 32 33 | 09 09 09 09 7b 0d 31 32 |te)).123|....{.12|
|00001a70| 34 09 09 09 09 69 66 20 | 28 65 72 72 20 3d 20 28 |4....if |(err = (|
|00001a80| 50 42 43 72 65 61 74 65 | 28 26 70 62 2c 66 61 6c |PBCreate|(&pb,fal|
|00001a90| 73 65 29 29 29 20 67 6f | 74 6f 20 65 72 72 5f 65 |se))) go|to err_e|
|00001aa0| 78 69 74 3b 0d 31 32 35 | 09 0d 0d 32 36 33 09 09 |xit;.125|...263..|
|00001ab0| 09 09 70 62 32 2e 69 6f | 46 56 65 72 73 4e 75 6d |..pb2.io|FVersNum|
|00001ac0| 09 3d 20 70 62 2e 69 6f | 56 65 72 73 4e 75 6d 3b |.= pb.io|VersNum;|
|00001ad0| 0d 32 36 34 09 23 69 66 | 6e 64 65 66 20 55 53 45 |.264.#if|ndef USE|
|00001ae0| 41 53 4d 0d 32 36 35 09 | 09 09 09 69 66 20 28 65 |ASM.265.|...if (e|
|00001af0| 72 72 20 3d 20 28 50 42 | 47 65 74 46 49 6e 66 6f |rr = (PB|GetFInfo|
|00001b00| 28 26 70 62 32 2c 66 61 | 6c 73 65 29 29 29 20 67 |(&pb2,fa|lse))) g|
|00001b10| 6f 74 6f 20 65 72 72 5f | 65 78 69 74 3b 0d 32 36 |oto err_|exit;.26|
|00001b20| 36 09 23 65 6c 73 65 0d | 32 36 37 09 09 09 09 61 |6.#else.|267....a|
|00001b30| 73 6d 0d 32 36 38 09 09 | 09 09 7b 09 6c 65 61 09 |sm.268..|..{.lea.|
|00001b40| 09 70 62 32 2c 61 30 0d | 32 36 39 09 09 09 09 09 |.pb2,a0.|269.....|
|00001b50| 5f 50 42 47 65 74 46 49 | 6e 66 6f 0d 32 37 30 09 |_PBGetFI|nfo.270.|
|00001b60| 09 09 09 09 62 6e 65 09 | 09 40 65 72 72 5f 65 78 |....bne.|.@err_ex|
|00001b70| 69 74 0d 32 37 31 09 09 | 09 09 7d 0d 32 37 32 09 |it.271..|..}.272.|
|00001b80| 23 65 6e 64 69 66 0d 32 | 37 33 09 0d 32 37 34 09 |#endif.2|73..274.|
|00001b90| 09 09 09 70 62 32 2e 69 | 6f 46 6c 46 6e 64 72 49 |...pb2.i|oFlFndrI|
|00001ba0| 6e 66 6f 2e 66 64 54 79 | 70 65 09 09 3d 20 27 54 |nfo.fdTy|pe..= 'T|
|00001bb0| 45 58 54 27 3b 0d 32 37 | 35 09 09 09 09 70 62 32 |EXT';.27|5....pb2|
|00001bc0| 2e 69 6f 46 6c 46 6e 64 | 72 49 6e 66 6f 2e 66 64 |.ioFlFnd|rInfo.fd|
|00001bd0| 43 72 65 61 74 6f 72 09 | 3d 20 27 3f 3f 3f 3f 27 |Creator.|= '????'|
|00001be0| 3b 0d 32 37 36 09 23 69 | 66 6e 64 65 66 20 55 53 |;.276.#i|fndef US|
|00001bf0| 45 41 53 4d 0d 32 37 37 | 09 09 09 09 69 66 20 28 |EASM.277|....if (|
|00001c00| 65 72 72 20 3d 20 28 50 | 42 53 65 74 46 49 6e 66 |err = (P|BSetFInf|
|00001c10| 6f 28 26 70 62 32 2c 66 | 61 6c 73 65 29 29 29 20 |o(&pb2,f|alse))) |
|00001c20| 67 6f 74 6f 20 65 72 72 | 5f 65 78 69 74 3b 0d 32 |goto err|_exit;.2|
|00001c30| 37 38 09 23 65 6c 73 65 | 0d 32 37 39 09 09 09 09 |78.#else|.279....|
|00001c40| 61 73 6d 0d 32 38 30 09 | 09 09 09 7b 09 6c 65 61 |asm.280.|...{.lea|
|00001c50| 09 09 70 62 32 2c 61 30 | 0d 32 38 31 09 09 09 09 |..pb2,a0|.281....|
|00001c60| 09 5f 50 42 53 65 74 46 | 49 6e 66 6f 0d 32 38 32 |._PBSetF|Info.282|
|00001c70| 09 09 09 09 09 62 6e 65 | 09 09 40 65 72 72 5f 65 |.....bne|..@err_e|
|00001c80| 78 69 74 0d 32 38 33 09 | 09 09 09 7d 0d 32 38 34 |xit.283.|...}.284|
|00001c90| 09 23 65 6e 64 69 66 0d | 32 38 35 09 0d 2d 2d 2d |.#endif.|285..---|
|00001ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 31 32 |--------|-----.12|
|00001cc0| 39 09 09 09 09 70 62 32 | 2e 69 6f 46 56 65 72 73 |9....pb2|.ioFVers|
|00001cd0| 4e 75 6d 09 3d 20 70 62 | 2e 69 6f 56 65 72 73 4e |Num.= pb|.ioVersN|
|00001ce0| 75 6d 3b 0d 31 33 30 09 | 09 09 09 69 66 20 28 65 |um;.130.|...if (e|
|00001cf0| 72 72 20 3d 20 28 50 42 | 47 65 74 46 49 6e 66 6f |rr = (PB|GetFInfo|
|00001d00| 28 26 70 62 32 2c 66 61 | 6c 73 65 29 29 29 20 67 |(&pb2,fa|lse))) g|
|00001d10| 6f 74 6f 20 65 72 72 5f | 65 78 69 74 3b 0d 31 33 |oto err_|exit;.13|
|00001d20| 31 09 0d 31 33 32 09 09 | 09 09 70 62 32 2e 69 6f |1..132..|..pb2.io|
|00001d30| 46 6c 46 6e 64 72 49 6e | 66 6f 2e 66 64 54 79 70 |FlFndrIn|fo.fdTyp|
|00001d40| 65 09 09 3d 20 27 54 45 | 58 54 27 3b 0d 31 33 33 |e..= 'TE|XT';.133|
|00001d50| 09 09 09 09 70 62 32 2e | 69 6f 46 6c 46 6e 64 72 |....pb2.|ioFlFndr|
|00001d60| 49 6e 66 6f 2e 66 64 43 | 72 65 61 74 6f 72 09 3d |Info.fdC|reator.=|
|00001d70| 20 27 3f 3f 3f 3f 27 3b | 0d 31 33 34 09 09 09 09 | '????';|.134....|
|00001d80| 69 66 20 28 65 72 72 20 | 3d 20 28 50 42 53 65 74 |if (err |= (PBSet|
|00001d90| 46 49 6e 66 6f 28 26 70 | 62 32 2c 66 61 6c 73 65 |FInfo(&p|b2,false|
|00001da0| 29 29 29 20 67 6f 74 6f | 20 65 72 72 5f 65 78 69 |))) goto| err_exi|
|00001db0| 74 3b 0d 31 33 35 09 0d | 0d 32 39 35 09 09 09 09 |t;.135..|.295....|
|00001dc0| 09 7b 0d 32 39 36 09 23 | 69 66 6e 64 65 66 20 55 |.{.296.#|ifndef U|
|00001dd0| 53 45 41 53 4d 0d 32 39 | 37 09 09 09 09 09 09 69 |SEASM.29|7......i|
|00001de0| 66 28 65 72 72 20 3d 20 | 28 50 42 47 65 74 45 4f |f(err = |(PBGetEO|
|00001df0| 46 28 26 70 62 2c 66 61 | 6c 73 65 29 29 29 20 67 |F(&pb,fa|lse))) g|
|00001e00| 6f 74 6f 20 65 72 72 5f | 65 78 69 74 3b 0d 32 39 |oto err_|exit;.29|
|00001e10| 38 09 23 65 6c 73 65 0d | 32 39 39 09 09 09 09 09 |8.#else.|299.....|
|00001e20| 09 61 73 6d 0d 33 30 30 | 09 09 09 09 09 09 7b 09 |.asm.300|......{.|
|00001e30| 6c 65 61 09 09 70 62 2c | 61 30 0d 33 30 31 09 09 |lea..pb,|a0.301..|
|00001e40| 09 09 09 09 09 5f 50 42 | 47 65 74 45 4f 46 0d 33 |....._PB|GetEOF.3|
|00001e50| 30 32 09 09 09 09 09 09 | 09 62 6e 65 09 09 40 65 |02......|.bne..@e|
|00001e60| 72 72 5f 65 78 69 74 0d | 33 30 33 09 09 09 09 09 |rr_exit.|303.....|
|00001e70| 09 7d 0d 33 30 34 09 23 | 65 6e 64 69 66 0d 33 30 |.}.304.#|endif.30|
|00001e80| 35 09 09 0d 33 30 36 09 | 09 09 09 09 09 70 62 2e |5...306.|.....pb.|
|00001e90| 69 6f 50 6f 73 4f 66 66 | 73 65 74 20 3d 20 28 6c |ioPosOff|set = (l|
|00001ea0| 6f 6e 67 29 70 62 2e 69 | 6f 4d 69 73 63 3b 0d 33 |ong)pb.i|oMisc;.3|
|00001eb0| 30 37 09 09 09 09 09 09 | 70 62 2e 69 6f 50 6f 73 |07......|pb.ioPos|
|00001ec0| 4d 6f 64 65 20 3d 20 66 | 73 46 72 6f 6d 53 74 61 |Mode = f|sFromSta|
|00001ed0| 72 74 3b 0d 33 30 38 09 | 23 69 66 6e 64 65 66 20 |rt;.308.|#ifndef |
|00001ee0| 55 53 45 41 53 4d 0d 33 | 30 39 09 09 09 09 09 09 |USEASM.3|09......|
|00001ef0| 65 72 72 20 3d 20 50 42 | 53 65 74 46 50 6f 73 28 |err = PB|SetFPos(|
|00001f00| 26 70 62 2c 66 61 6c 73 | 65 29 3b 0d 33 31 30 09 |&pb,fals|e);.310.|
|00001f10| 09 09 09 09 09 69 66 20 | 28 28 65 72 72 21 3d 6e |.....if |((err!=n|
|00001f20| 6f 45 72 72 29 20 26 26 | 20 28 65 72 72 21 3d 65 |oErr) &&| (err!=e|
|00001f30| 6f 66 45 72 72 29 29 20 | 67 6f 74 6f 20 65 72 72 |ofErr)) |goto err|
|00001f40| 5f 65 78 69 74 3b 0d 33 | 31 31 09 23 65 6c 73 65 |_exit;.3|11.#else|
|00001f50| 0d 33 31 32 09 09 09 09 | 09 09 61 73 6d 0d 33 31 |.312....|..asm.31|
|00001f60| 33 09 09 09 09 09 09 7b | 09 6c 65 61 09 09 70 62 |3......{|.lea..pb|
|00001f70| 2c 61 30 0d 33 31 34 09 | 09 09 09 09 09 09 5f 50 |,a0.314.|......_P|
|00001f80| 42 53 65 74 46 50 6f 73 | 0d 33 31 35 09 09 09 09 |BSetFPos|.315....|
|00001f90| 09 09 09 62 65 71 2e 73 | 09 40 31 0d 33 31 36 09 |...beq.s|.@1.316.|
|00001fa0| 09 09 09 09 09 09 63 6d | 70 2e 77 09 23 65 6f 66 |......cm|p.w.#eof|
|00001fb0| 45 72 72 2c 64 30 0d 33 | 31 37 09 09 09 09 09 09 |Err,d0.3|17......|
|00001fc0| 09 62 6e 65 09 09 40 65 | 72 72 5f 65 78 69 74 0d |.bne..@e|rr_exit.|
|00001fd0| 33 31 38 09 09 09 09 09 | 09 40 31 0d 33 31 39 09 |318.....|.@1.319.|
|00001fe0| 09 09 09 09 09 7d 0d 33 | 32 30 09 23 65 6e 64 69 |.....}.3|20.#endi|
|00001ff0| 66 0d 33 32 31 09 09 09 | 09 09 7d 0d 2d 2d 2d 2d |f.321...|..}.----|
|00002000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 31 34 35 |--------|----.145|
|00002020| 09 09 09 09 09 7b 0d 31 | 34 36 09 09 09 09 09 09 |.....{.1|46......|
|00002030| 69 66 28 65 72 72 20 3d | 20 28 50 42 47 65 74 45 |if(err =| (PBGetE|
|00002040| 4f 46 28 26 70 62 2c 66 | 61 6c 73 65 29 29 29 20 |OF(&pb,f|alse))) |
|00002050| 67 6f 74 6f 20 65 72 72 | 5f 65 78 69 74 3b 0d 31 |goto err|_exit;.1|
|00002060| 34 37 09 09 0d 31 34 38 | 09 09 09 09 09 09 70 62 |47...148|......pb|
|00002070| 2e 69 6f 50 6f 73 4f 66 | 66 73 65 74 20 3d 20 28 |.ioPosOf|fset = (|
|00002080| 6c 6f 6e 67 29 70 62 2e | 69 6f 4d 69 73 63 3b 0d |long)pb.|ioMisc;.|
|00002090| 31 34 39 09 09 09 09 09 | 09 70 62 2e 69 6f 50 6f |149.....|.pb.ioPo|
|000020a0| 73 4d 6f 64 65 20 3d 20 | 66 73 46 72 6f 6d 53 74 |sMode = |fsFromSt|
|000020b0| 61 72 74 3b 0d 31 35 30 | 09 09 09 09 09 09 65 72 |art;.150|......er|
|000020c0| 72 20 3d 20 50 42 53 65 | 74 46 50 6f 73 28 26 70 |r = PBSe|tFPos(&p|
|000020d0| 62 2c 66 61 6c 73 65 29 | 3b 0d 31 35 31 09 09 09 |b,false)|;.151...|
|000020e0| 09 09 09 69 66 20 28 28 | 65 72 72 21 3d 6e 6f 45 |...if ((|err!=noE|
|000020f0| 72 72 29 20 26 26 20 28 | 65 72 72 21 3d 65 6f 66 |rr) && (|err!=eof|
|00002100| 45 72 72 29 29 20 67 6f | 74 6f 20 65 72 72 5f 65 |Err)) go|to err_e|
|00002110| 78 69 74 3b 0d 31 35 32 | 09 09 09 09 09 7d 0d 0d |xit;.152|.....}..|
|00002120| 33 32 38 09 09 09 09 09 | 09 70 62 32 2e 69 6f 46 |328.....|.pb2.ioF|
|00002130| 56 65 72 73 4e 75 6d 09 | 3d 20 70 62 2e 69 6f 56 |VersNum.|= pb.ioV|
|00002140| 65 72 73 4e 75 6d 3b 0d | 33 32 39 09 23 69 66 6e |ersNum;.|329.#ifn|
|00002150| 64 65 66 20 55 53 45 41 | 53 4d 0d 33 33 30 09 09 |def USEA|SM.330..|
|00002160| 09 09 09 09 69 66 20 28 | 65 72 72 20 3d 20 28 50 |....if (|err = (P|
|00002170| 42 47 65 74 46 49 6e 66 | 6f 28 26 70 62 32 2c 66 |BGetFInf|o(&pb2,f|
|00002180| 61 6c 73 65 29 29 29 20 | 67 6f 74 6f 20 65 72 72 |alse))) |goto err|
|00002190| 5f 65 78 69 74 3b 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |_exit;.-|--------|
|000021a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021b0| 2d 2d 2d 2d 2d 2d 2d 0d | 31 35 39 09 09 09 09 09 |-------.|159.....|
|000021c0| 09 70 62 32 2e 69 6f 46 | 56 65 72 73 4e 75 6d 09 |.pb2.ioF|VersNum.|
|000021d0| 3d 20 70 62 2e 69 6f 56 | 65 72 73 4e 75 6d 3b 0d |= pb.ioV|ersNum;.|
|000021e0| 31 36 30 09 09 09 09 09 | 09 69 66 20 28 65 72 72 |160.....|.if (err|
|000021f0| 20 3d 20 28 50 42 47 65 | 74 46 49 6e 66 6f 28 26 | = (PBGe|tFInfo(&|
|00002200| 70 62 32 2c 66 61 6c 73 | 65 29 29 29 20 67 6f 74 |pb2,fals|e))) got|
|00002210| 6f 20 65 72 72 5f 65 78 | 69 74 3b 0d 0d 33 34 30 |o err_ex|it;..340|
|00002220| 09 09 09 09 09 09 6e 65 | 77 20 3d 20 50 42 4f 70 |......ne|w = PBOp|
|00002230| 65 6e 28 26 70 62 2c 66 | 61 6c 73 65 29 3b 0d 33 |en(&pb,f|alse);.3|
|00002240| 34 31 09 23 65 6c 73 65 | 0d 33 34 32 09 09 09 09 |41.#else|.342....|
|00002250| 09 09 61 73 6d 0d 33 34 | 33 09 09 09 09 09 09 7b |..asm.34|3......{|
|00002260| 09 6c 65 61 09 09 70 62 | 32 2c 61 30 0d 33 34 34 |.lea..pb|2,a0.344|
|00002270| 09 09 09 09 09 09 09 5f | 50 42 47 65 74 46 49 6e |......._|PBGetFIn|
|00002280| 66 6f 0d 33 34 35 09 09 | 09 09 09 09 09 62 6e 65 |fo.345..|.....bne|
|00002290| 09 09 40 65 72 72 5f 65 | 78 69 74 0d 33 34 36 09 |..@err_e|xit.346.|
|000022a0| 09 09 09 09 09 09 6c 65 | 61 09 09 70 62 2c 61 30 |......le|a..pb,a0|
|000022b0| 0d 33 34 37 09 09 09 09 | 09 09 09 5f 50 42 43 6c |.347....|..._PBCl|
|000022c0| 6f 73 65 0d 33 34 38 09 | 09 09 09 09 09 09 62 6e |ose.348.|......bn|
|000022d0| 65 09 09 40 65 72 72 5f | 65 78 69 74 0d 33 34 39 |e..@err_|exit.349|
|000022e0| 09 09 09 09 09 09 09 6c | 65 61 09 09 70 62 2c 61 |.......l|ea..pb,a|
|000022f0| 30 0d 33 35 30 09 09 09 | 09 09 09 09 5f 50 42 44 |0.350...|...._PBD|
|00002300| 65 6c 65 74 65 0d 33 35 | 31 09 09 09 09 09 09 09 |elete.35|1.......|
|00002310| 62 6e 65 09 09 40 65 72 | 72 5f 65 78 69 74 0d 33 |bne..@er|r_exit.3|
|00002320| 35 32 09 09 09 09 09 09 | 09 6c 65 61 09 09 70 62 |52......|.lea..pb|
|00002330| 2c 61 30 0d 33 35 33 09 | 09 09 09 09 09 09 5f 50 |,a0.353.|......_P|
|00002340| 42 43 72 65 61 74 65 0d | 33 35 34 09 09 09 09 09 |BCreate.|354.....|
|00002350| 09 09 62 6e 65 09 09 40 | 65 72 72 5f 65 78 69 74 |..bne..@|err_exit|
|00002360| 0d 33 35 35 09 09 09 09 | 09 09 09 6c 65 61 09 09 |.355....|...lea..|
|00002370| 70 62 32 2c 61 30 0d 33 | 35 36 09 09 09 09 09 09 |pb2,a0.3|56......|
|00002380| 09 5f 50 42 53 65 74 46 | 49 6e 66 6f 0d 33 35 37 |._PBSetF|Info.357|
|00002390| 09 09 09 09 09 09 09 62 | 6e 65 09 09 40 65 72 72 |.......b|ne..@err|
|000023a0| 5f 65 78 69 74 0d 33 35 | 38 09 09 09 09 09 09 09 |_exit.35|8.......|
|000023b0| 6c 65 61 09 09 70 62 2c | 61 30 0d 33 35 39 09 09 |lea..pb,|a0.359..|
|000023c0| 09 09 09 09 09 5f 50 42 | 4f 70 65 6e 0d 33 36 30 |....._PB|Open.360|
|000023d0| 09 09 09 09 09 09 09 6d | 6f 76 65 2e 6c 09 64 30 |.......m|ove.l.d0|
|000023e0| 2c 6e 65 77 0d 33 36 31 | 09 09 09 09 09 09 7d 0d |,new.361|......}.|
|000023f0| 33 36 32 09 23 65 6e 64 | 69 66 0d 33 36 33 09 09 |362.#end|if.363..|
|00002400| 09 09 09 09 63 72 65 61 | 74 65 20 3d 20 66 61 6c |....crea|te = fal|
|00002410| 73 65 3b 0d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |se;.----|--------|
|00002420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002430| 2d 2d 2d 2d 0d 31 37 30 | 09 09 09 09 09 09 6e 65 |----.170|......ne|
|00002440| 77 20 3d 20 50 42 4f 70 | 65 6e 28 26 70 62 2c 66 |w = PBOp|en(&pb,f|
|00002450| 61 6c 73 65 29 3b 0d 31 | 37 31 09 09 09 09 09 09 |alse);.1|71......|
|00002460| 63 72 65 61 74 65 20 3d | 20 66 61 6c 73 65 3b 0d |create =| false;.|
|00002470| 0d 33 38 37 09 09 09 09 | 09 77 68 6f 2d 3e 69 6e |.387....|.who->in|
|00002480| 62 75 66 09 09 3d 20 30 | 3b 0d 33 38 38 09 23 69 |buf..= 0|;.388.#i|
|00002490| 66 64 65 66 20 53 54 44 | 46 49 4c 45 0d 33 38 39 |fdef STD|FILE.389|
|000024a0| 09 23 69 66 64 65 66 20 | 46 44 4f 50 45 4e 0d 33 |.#ifdef |FDOPEN.3|
|000024b0| 39 30 09 09 09 09 09 69 | 66 28 21 53 46 64 72 69 |90.....i|f(!SFdri|
|000024c0| 76 65 72 20 26 26 20 21 | 46 44 6f 70 65 6e 29 0d |ver && !|FDopen).|
|000024d0| 33 39 31 09 23 65 6c 73 | 65 0d 33 39 32 09 09 09 |391.#els|e.392...|
|000024e0| 09 09 69 66 28 21 53 46 | 44 72 69 76 65 72 29 0d |..if(!SF|Driver).|
|000024f0| 33 39 33 09 23 65 6e 64 | 69 66 0d 33 39 34 09 23 |393.#end|if.394.#|
|00002500| 65 6c 73 65 0d 33 39 35 | 09 23 69 66 64 65 66 20 |else.395|.#ifdef |
|00002510| 46 44 4f 50 45 4e 0d 33 | 39 36 09 09 09 09 09 69 |FDOPEN.3|96.....i|
|00002520| 66 28 21 46 44 6f 70 65 | 6e 29 0d 33 39 37 09 23 |f(!FDope|n).397.#|
|00002530| 65 6e 64 69 66 0d 33 39 | 38 09 23 65 6e 64 69 66 |endif.39|8.#endif|
|00002540| 0d 33 39 39 09 09 09 09 | 09 09 50 74 6f 43 73 74 |.399....|..PtoCst|
|00002550| 72 28 6e 61 6d 65 70 74 | 72 29 3b 0d 34 30 30 09 |r(namept|r);.400.|
|00002560| 09 09 09 09 69 66 20 28 | 5f 69 6e 69 74 5f 6f 6e |....if (|_init_on|
|00002570| 65 78 69 74 20 3d 3d 20 | 66 61 6c 73 65 29 0d 2d |exit == |false).-|
|00002580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|000025a0| 31 39 35 09 09 09 09 09 | 77 68 6f 2d 3e 69 6e 62 |195.....|who->inb|
|000025b0| 75 66 09 09 3d 20 30 3b | 0d 31 39 36 09 09 09 09 |uf..= 0;|.196....|
|000025c0| 09 50 74 6f 43 73 74 72 | 28 6e 61 6d 65 70 74 72 |.PtoCstr|(nameptr|
|000025d0| 29 3b 0d 31 39 37 09 09 | 09 09 09 69 66 20 28 5f |);.197..|...if (_|
|000025e0| 69 6e 69 74 5f 6f 6e 65 | 78 69 74 20 3d 3d 20 66 |init_one|xit == f|
|000025f0| 61 6c 73 65 29 0d 0d 34 | 32 35 09 65 72 72 5f 65 |alse)..4|25.err_e|
|00002600| 78 69 74 3a 0d 34 32 36 | 09 23 69 66 6e 64 65 66 |xit:.426|.#ifndef|
|00002610| 20 55 53 45 41 53 4d 0d | 34 32 37 09 09 65 72 72 | USEASM.|427..err|
|00002620| 6e 6f 20 3d 20 65 72 72 | 3b 0d 34 32 38 09 23 65 |no = err|;.428.#e|
|00002630| 6c 73 65 0d 34 32 39 09 | 09 61 73 6d 0d 34 33 30 |lse.429.|.asm.430|
|00002640| 09 09 7b 09 6d 6f 76 65 | 2e 6c 09 09 64 30 2c 65 |..{.move|.l..d0,e|
|00002650| 72 72 6e 6f 0d 34 33 31 | 09 09 7d 0d 34 33 32 09 |rrno.431|..}.432.|
|00002660| 23 65 6e 64 69 66 0d 34 | 33 33 09 09 0d 34 33 34 |#endif.4|33...434|
|00002670| 09 65 78 69 74 5f 6e 6f | 73 65 74 3a 0d 34 33 35 |.exit_no|set:.435|
|00002680| 09 0d 34 33 36 09 23 69 | 66 6e 64 65 66 20 55 53 |..436.#i|fndef US|
|00002690| 45 41 53 4d 0d 34 33 37 | 09 09 44 69 73 70 6f 73 |EASM.437|..Dispos|
|000026a0| 50 74 72 28 70 29 3b 0d | 34 33 38 09 23 65 6c 73 |Ptr(p);.|438.#els|
|000026b0| 65 0d 34 33 39 09 09 61 | 73 6d 0d 34 34 30 09 09 |e.439..a|sm.440..|
|000026c0| 7b 09 6d 6f 76 65 61 2e | 6c 09 09 70 2c 61 30 0d |{.movea.|l..p,a0.|
|000026d0| 34 34 31 09 09 09 5f 44 | 69 73 70 6f 73 50 74 72 |441..._D|isposPtr|
|000026e0| 0d 34 34 32 09 09 7d 0d | 34 34 33 09 23 65 6e 64 |.442..}.|443.#end|
|000026f0| 69 66 0d 34 34 34 09 0d | 34 34 35 09 23 69 66 64 |if.444..|445.#ifd|
|00002700| 65 66 20 53 54 44 46 49 | 4c 45 0d 34 34 36 09 23 |ef STDFI|LE.446.#|
|00002710| 69 66 64 65 66 20 46 44 | 4f 50 45 4e 0d 34 34 37 |ifdef FD|OPEN.447|
|00002720| 09 09 69 66 28 21 53 46 | 64 72 69 76 65 72 20 26 |..if(!SF|driver &|
|00002730| 26 20 21 46 44 6f 70 65 | 6e 29 0d 34 34 38 09 23 |& !FDope|n).448.#|
|00002740| 65 6c 73 65 0d 34 34 39 | 09 09 69 66 28 21 53 46 |else.449|..if(!SF|
|00002750| 64 72 69 76 65 72 29 0d | 34 35 30 09 23 65 6e 64 |driver).|450.#end|
|00002760| 69 66 0d 34 35 31 09 23 | 65 6c 73 65 0d 34 35 32 |if.451.#|else.452|
|00002770| 09 23 69 66 64 65 66 20 | 46 44 4f 50 45 4e 0d 34 |.#ifdef |FDOPEN.4|
|00002780| 35 33 09 09 69 66 28 21 | 46 44 6f 70 65 6e 29 0d |53..if(!|FDopen).|
|00002790| 34 35 34 09 23 65 6e 64 | 69 66 0d 34 35 35 09 23 |454.#end|if.455.#|
|000027a0| 65 6e 64 69 66 0d 34 35 | 36 09 09 09 50 74 6f 43 |endif.45|6...PtoC|
|000027b0| 73 74 72 28 6e 61 6d 65 | 70 74 72 29 3b 0d 34 35 |str(name|ptr);.45|
|000027c0| 37 09 09 72 65 74 75 72 | 6e 28 4e 55 4c 4c 29 3b |7..retur|n(NULL);|
|000027d0| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|000027e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027f0| 2d 0d 32 32 32 09 65 72 | 72 5f 65 78 69 74 3a 0d |-.222.er|r_exit:.|
|00002800| 32 32 33 09 09 65 72 72 | 6e 6f 20 3d 20 65 72 72 |223..err|no = err|
|00002810| 3b 0d 32 32 34 09 09 0d | 32 32 35 09 65 78 69 74 |;.224...|225.exit|
|00002820| 5f 6e 6f 73 65 74 3a 0d | 32 32 36 09 0d 32 32 37 |_noset:.|226..227|
|00002830| 09 09 44 69 73 70 6f 73 | 50 74 72 28 70 29 3b 0d |..Dispos|Ptr(p);.|
|00002840| 32 32 38 09 09 50 74 6f | 43 73 74 72 28 6e 61 6d |228..Pto|Cstr(nam|
|00002850| 65 70 74 72 29 3b 0d 32 | 32 39 09 09 72 65 74 75 |eptr);.2|29..retu|
|00002860| 72 6e 28 4e 55 4c 4c 29 | 3b 0d 0d 34 39 38 09 09 |rn(NULL)|;..498..|
|00002870| 09 09 09 09 67 6f 74 6f | 20 65 72 72 32 5f 65 78 |....goto| err2_ex|
|00002880| 69 74 3b 0d 34 39 39 09 | 09 09 09 70 62 2e 69 6f |it;.499.|...pb.io|
|00002890| 52 65 66 4e 75 6d 20 3d | 20 72 65 66 6e 75 6d 3b |RefNum =| refnum;|
|000028a0| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|000028b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028c0| 2d 0d 32 37 30 09 09 09 | 09 09 09 67 6f 74 6f 20 |-.270...|...goto |
|000028d0| 65 72 72 32 5f 65 78 69 | 74 3b 0d 32 37 31 09 0d |err2_exi|t;.271..|
|000028e0| 32 37 32 09 09 09 09 70 | 62 2e 69 6f 52 65 66 4e |272....p|b.ioRefN|
|000028f0| 75 6d 20 3d 20 72 65 66 | 6e 75 6d 3b 0d 0d 35 30 |um = ref|num;..50|
|00002900| 37 09 0d 35 30 38 09 23 | 69 66 6e 64 65 66 20 55 |7..508.#|ifndef U|
|00002910| 53 45 41 53 4d 0d 35 30 | 39 09 09 09 09 09 69 66 |SEASM.50|9.....if|
|00002920| 20 28 65 72 72 20 3d 20 | 77 68 6f 2d 3e 6c 61 73 | (err = |who->las|
|00002930| 74 5f 65 72 72 6f 72 20 | 3d 20 50 42 57 72 69 74 |t_error |= PBWrit|
|00002940| 65 28 26 70 62 2c 66 61 | 6c 73 65 29 29 0d 35 31 |e(&pb,fa|lse)).51|
|00002950| 30 09 09 09 09 09 09 65 | 72 72 6e 6f 20 3d 20 65 |0......e|rrno = e|
|00002960| 72 72 3b 0d 35 31 31 09 | 23 65 6c 73 65 0d 35 31 |rr;.511.|#else.51|
|00002970| 32 09 09 09 09 09 61 73 | 6d 0d 35 31 33 09 09 09 |2.....as|m.513...|
|00002980| 09 09 7b 09 6c 65 61 09 | 09 09 70 62 2c 61 30 0d |..{.lea.|..pb,a0.|
|00002990| 35 31 34 09 09 09 09 09 | 09 5f 50 42 57 72 69 74 |514.....|._PBWrit|
|000029a0| 65 0d 35 31 35 09 09 09 | 09 09 09 6d 6f 76 65 2e |e.515...|...move.|
|000029b0| 77 09 09 64 30 2c 65 72 | 72 0d 35 31 36 09 09 09 |w..d0,er|r.516...|
|000029c0| 09 09 09 6d 6f 76 65 2e | 77 09 09 64 30 2c 4f 46 |...move.|w..d0,OF|
|000029d0| 46 53 45 54 28 46 49 4c | 45 2c 6c 61 73 74 5f 65 |FSET(FIL|E,last_e|
|000029e0| 72 72 6f 72 29 28 77 68 | 6f 29 0d 35 31 37 09 09 |rror)(wh|o).517..|
|000029f0| 09 09 09 09 62 65 71 2e | 73 09 09 40 33 0d 35 31 |....beq.|s..@3.51|
|00002a00| 38 09 09 09 09 09 09 6d | 6f 76 65 2e 77 09 09 64 |8......m|ove.w..d|
|00002a10| 30 2c 65 72 72 6e 6f 0d | 35 31 39 09 09 09 09 09 |0,errno.|519.....|
|00002a20| 40 33 0d 35 32 30 09 09 | 09 09 09 7d 0d 35 32 31 |@3.520..|...}.521|
|00002a30| 09 23 65 6e 64 69 66 0d | 35 32 32 09 09 09 09 7d |.#endif.|522....}|
|00002a40| 0d 35 32 33 09 0d 35 32 | 34 09 09 09 09 77 68 6f |.523..52|4....who|
|00002a50| 2d 3e 49 6e 55 73 65 20 | 3d 20 66 61 6c 73 65 3b |->InUse |= false;|
|00002a60| 0d 35 32 35 09 23 69 66 | 6e 64 65 66 20 55 53 45 |.525.#if|ndef USE|
|00002a70| 41 53 4d 0d 35 32 36 09 | 09 09 09 69 66 20 28 65 |ASM.526.|...if (e|
|00002a80| 72 72 20 3d 20 28 50 42 | 43 6c 6f 73 65 28 26 70 |rr = (PB|Close(&p|
|00002a90| 62 2c 66 61 6c 73 65 29 | 29 29 09 09 2f 2a 20 63 |b,false)|))../* c|
|00002aa0| 6c 6f 73 65 20 66 69 6c | 65 20 2a 2f 0d 35 32 37 |lose fil|e */.527|
|00002ab0| 09 09 09 09 09 67 6f 74 | 6f 20 65 72 72 32 5f 65 |.....got|o err2_e|
|00002ac0| 78 69 74 3b 0d 35 32 38 | 09 23 65 6c 73 65 0d 35 |xit;.528|.#else.5|
|00002ad0| 32 39 09 09 09 09 61 73 | 6d 0d 35 33 30 09 09 09 |29....as|m.530...|
|00002ae0| 09 7b 09 6c 65 61 09 09 | 70 62 2c 61 30 0d 35 33 |.{.lea..|pb,a0.53|
|00002af0| 31 09 09 09 09 09 5f 50 | 42 43 6c 6f 73 65 0d 35 |1....._P|BClose.5|
|00002b00| 33 32 09 09 09 09 09 6d | 6f 76 65 2e 77 09 64 30 |32.....m|ove.w.d0|
|00002b10| 2c 65 72 72 0d 35 33 33 | 09 09 09 09 09 62 6e 65 |,err.533|.....bne|
|00002b20| 09 09 40 65 72 72 32 5f | 65 78 69 74 0d 35 33 34 |..@err2_|exit.534|
|00002b30| 09 09 09 09 7d 0d 35 33 | 35 09 23 65 6e 64 69 66 |....}.53|5.#endif|
|00002b40| 0d 35 33 36 09 0d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.536..--|--------|
|00002b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b60| 2d 2d 2d 2d 2d 2d 0d 32 | 38 30 09 0d 32 38 31 09 |------.2|80..281.|
|00002b70| 09 09 09 09 69 66 20 28 | 65 72 72 20 3d 20 77 68 |....if (|err = wh|
|00002b80| 6f 2d 3e 6c 61 73 74 5f | 65 72 72 6f 72 20 3d 20 |o->last_|error = |
|00002b90| 50 42 57 72 69 74 65 28 | 26 70 62 2c 66 61 6c 73 |PBWrite(|&pb,fals|
|00002ba0| 65 29 29 0d 32 38 32 09 | 09 09 09 09 09 65 72 72 |e)).282.|.....err|
|00002bb0| 6e 6f 20 3d 20 65 72 72 | 3b 0d 32 38 33 09 09 09 |no = err|;.283...|
|00002bc0| 09 7d 0d 32 38 34 09 0d | 32 38 35 09 09 09 09 77 |.}.284..|285....w|
|00002bd0| 68 6f 2d 3e 49 6e 55 73 | 65 20 3d 20 66 61 6c 73 |ho->InUs|e = fals|
|00002be0| 65 3b 0d 32 38 36 09 09 | 09 09 69 66 20 28 65 72 |e;.286..|..if (er|
|00002bf0| 72 20 3d 20 28 50 42 43 | 6c 6f 73 65 28 26 70 62 |r = (PBC|lose(&pb|
|00002c00| 2c 66 61 6c 73 65 29 29 | 29 09 09 2f 2a 20 63 6c |,false))|)../* cl|
|00002c10| 6f 73 65 20 66 69 6c 65 | 20 2a 2f 0d 32 38 37 09 |ose file| */.287.|
|00002c20| 09 09 09 09 67 6f 74 6f | 20 65 72 72 32 5f 65 78 |....goto| err2_ex|
|00002c30| 69 74 3b 0d 32 38 38 09 | 0d 0d 35 34 30 09 09 09 |it;.288.|..540...|
|00002c40| 09 09 70 62 2e 69 6f 4e | 61 6d 65 50 74 72 20 3d |..pb.ioN|amePtr =|
|00002c50| 20 30 4c 3b 0d 35 34 31 | 09 23 69 66 6e 64 65 66 | 0L;.541|.#ifndef|
|00002c60| 20 55 53 45 41 53 4d 0d | 35 34 32 09 09 09 09 09 | USEASM.|542.....|
|00002c70| 69 66 20 28 65 72 72 20 | 3d 20 28 50 42 46 6c 73 |if (err |= (PBFls|
|00002c80| 68 56 6f 6c 28 26 70 62 | 2c 66 61 6c 73 65 29 29 |hVol(&pb|,false))|
|00002c90| 29 09 09 2f 2a 20 66 6c | 75 73 68 20 76 6f 6c 20 |)../* fl|ush vol |
|00002ca0| 2a 2f 0d 35 34 33 09 09 | 09 09 09 09 67 6f 74 6f |*/.543..|....goto|
|00002cb0| 20 65 72 72 32 5f 65 78 | 69 74 3b 0d 35 34 34 09 | err2_ex|it;.544.|
|00002cc0| 23 65 6c 73 65 0d 35 34 | 35 09 09 09 09 09 61 73 |#else.54|5.....as|
|00002cd0| 6d 0d 35 34 36 09 09 09 | 09 09 7b 09 6c 65 61 09 |m.546...|..{.lea.|
|00002ce0| 09 70 62 2c 61 30 0d 35 | 34 37 09 09 09 09 09 09 |.pb,a0.5|47......|
|00002cf0| 5f 50 42 46 6c 73 68 56 | 6f 6c 0d 35 34 38 09 09 |_PBFlshV|ol.548..|
|00002d00| 09 09 09 09 6d 6f 76 65 | 2e 77 09 64 30 2c 65 72 |....move|.w.d0,er|
|00002d10| 72 0d 35 34 39 09 09 09 | 09 09 09 62 6e 65 09 09 |r.549...|...bne..|
|00002d20| 40 65 72 72 32 5f 65 78 | 69 74 0d 35 35 30 09 09 |@err2_ex|it.550..|
|00002d30| 09 09 09 7d 0d 35 35 31 | 09 23 65 6e 64 69 66 0d |...}.551|.#endif.|
|00002d40| 35 35 32 09 09 09 09 7d | 0d 2d 2d 2d 2d 2d 2d 2d |552....}|.-------|
|00002d50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002d60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 32 39 32 09 09 09 |--------|-.292...|
|00002d70| 09 09 70 62 2e 69 6f 4e | 61 6d 65 50 74 72 20 3d |..pb.ioN|amePtr =|
|00002d80| 20 30 4c 3b 0d 32 39 33 | 09 09 09 09 09 69 66 20 | 0L;.293|.....if |
|00002d90| 28 65 72 72 20 3d 20 28 | 50 42 46 6c 73 68 56 6f |(err = (|PBFlshVo|
|00002da0| 6c 28 26 70 62 2c 66 61 | 6c 73 65 29 29 29 09 09 |l(&pb,fa|lse)))..|
|00002db0| 2f 2a 20 66 6c 75 73 68 | 20 76 6f 6c 20 2a 2f 0d |/* flush| vol */.|
|00002dc0| 32 39 34 09 09 09 09 09 | 09 67 6f 74 6f 20 65 72 |294.....|.goto er|
|00002dd0| 72 32 5f 65 78 69 74 3b | 0d 32 39 35 09 09 09 09 |r2_exit;|.295....|
|00002de0| 7d 0d 0d 35 36 39 09 09 | 09 69 66 20 28 21 77 68 |}..569..|.if (!wh|
|00002df0| 6f 2d 3e 75 73 65 72 5f | 62 75 66 29 0d 35 37 30 |o->user_|buf).570|
|00002e00| 09 23 69 66 6e 64 65 66 | 20 55 53 45 41 53 4d 0d |.#ifndef| USEASM.|
|00002e10| 35 37 31 09 09 09 09 44 | 69 73 70 6f 73 50 74 72 |571....D|isposPtr|
|00002e20| 28 77 68 6f 2d 3e 66 69 | 6c 65 62 75 66 29 3b 09 |(who->fi|lebuf);.|
|00002e30| 09 09 2f 2a 20 64 69 73 | 70 6f 73 65 20 6d 65 6d |../* dis|pose mem|
|00002e40| 2a 2f 0d 35 37 32 09 23 | 65 6c 73 65 0d 35 37 33 |*/.572.#|else.573|
|00002e50| 09 09 09 09 61 73 6d 0d | 35 37 34 09 09 09 09 7b |....asm.|574....{|
|00002e60| 09 6d 6f 76 65 61 2e 6c | 09 09 4f 46 46 53 45 54 |.movea.l|..OFFSET|
|00002e70| 28 46 49 4c 45 2c 66 69 | 6c 65 62 75 66 29 28 77 |(FILE,fi|lebuf)(w|
|00002e80| 68 6f 29 2c 61 30 0d 35 | 37 35 09 09 09 09 09 5f |ho),a0.5|75....._|
|00002e90| 44 69 73 70 6f 73 50 74 | 72 0d 35 37 36 09 09 09 |DisposPt|r.576...|
|00002ea0| 09 7d 0d 35 37 37 09 23 | 65 6e 64 69 66 0d 35 37 |.}.577.#|endif.57|
|00002eb0| 38 09 09 09 72 65 74 75 | 72 6e 28 30 29 3b 0d 2d |8...retu|rn(0);.-|
|00002ec0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ed0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00002ee0| 33 31 32 09 09 09 69 66 | 20 28 21 77 68 6f 2d 3e |312...if| (!who->|
|00002ef0| 75 73 65 72 5f 62 75 66 | 29 0d 33 31 33 09 09 09 |user_buf|).313...|
|00002f00| 09 44 69 73 70 6f 73 50 | 74 72 28 77 68 6f 2d 3e |.DisposP|tr(who->|
|00002f10| 66 69 6c 65 62 75 66 29 | 3b 09 09 09 2f 2a 20 64 |filebuf)|;.../* d|
|00002f20| 69 73 70 6f 73 65 20 6d | 65 6d 2a 2f 0d 33 31 34 |ispose m|em*/.314|
|00002f30| 09 0d 33 31 35 09 09 09 | 72 65 74 75 72 6e 28 30 |..315...|return(0|
|00002f40| 29 3b 0d 0d 35 39 37 09 | 7b 0d 35 39 38 09 23 69 |);..597.|{.598.#i|
|00002f50| 66 64 65 66 20 46 44 4f | 50 45 4e 0d 35 39 39 09 |fdef FDO|PEN.599.|
|00002f60| 09 72 65 74 75 72 6e 28 | 78 66 6f 70 65 6e 28 30 |.return(|xfopen(0|
|00002f70| 2c 6e 61 6d 65 70 74 72 | 2c 74 79 70 65 2c 4e 55 |,nameptr|,type,NU|
|00002f80| 4c 4c 29 29 3b 0d 36 30 | 30 09 23 65 6c 73 65 0d |LL));.60|0.#else.|
|00002f90| 36 30 31 09 09 72 65 74 | 75 72 6e 28 78 66 6f 70 |601..ret|urn(xfop|
|00002fa0| 65 6e 28 6e 61 6d 65 70 | 74 72 2c 74 79 70 65 2c |en(namep|tr,type,|
|00002fb0| 4e 55 4c 4c 29 29 3b 0d | 36 30 32 09 23 65 6e 64 |NULL));.|602.#end|
|00002fc0| 69 66 0d 36 30 33 09 09 | 0d 2d 2d 2d 2d 2d 2d 2d |if.603..|.-------|
|00002fd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002fe0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 33 33 34 09 7b 0d |--------|-.334.{.|
|00002ff0| 33 33 35 09 09 72 65 74 | 75 72 6e 28 78 66 6f 70 |335..ret|urn(xfop|
|00003000| 65 6e 28 6e 61 6d 65 70 | 74 72 2c 74 79 70 65 2c |en(namep|tr,type,|
|00003010| 4e 55 4c 4c 29 29 3b 0d | 33 33 36 09 09 0d 0d 36 |NULL));.|336....6|
|00003020| 31 36 09 09 69 66 28 66 | 63 6c 6f 73 65 28 77 68 |16..if(f|close(wh|
|00003030| 6f 29 29 20 72 65 74 75 | 72 6e 28 4e 55 4c 4c 29 |o)) retu|rn(NULL)|
|00003040| 3b 0d 36 31 37 09 23 69 | 66 64 65 66 20 46 44 4f |;.617.#i|fdef FDO|
|00003050| 50 45 4e 0d 36 31 38 09 | 09 72 65 74 75 72 6e 28 |PEN.618.|.return(|
|00003060| 78 66 6f 70 65 6e 28 30 | 2c 6e 61 6d 65 70 74 72 |xfopen(0|,nameptr|
|00003070| 2c 74 79 70 65 2c 77 68 | 6f 29 29 3b 0d 36 31 39 |,type,wh|o));.619|
|00003080| 09 23 65 6c 73 65 0d 36 | 32 30 09 09 72 65 74 75 |.#else.6|20..retu|
|00003090| 72 6e 28 78 66 6f 70 65 | 6e 28 6e 61 6d 65 70 74 |rn(xfope|n(namept|
|000030a0| 72 2c 74 79 70 65 2c 77 | 68 6f 29 29 3b 0d 36 32 |r,type,w|ho));.62|
|000030b0| 31 09 23 65 6e 64 69 66 | 0d 36 32 32 09 7d 0d 36 |1.#endif|.622.}.6|
|000030c0| 32 33 09 0d 36 32 34 09 | 23 69 66 64 65 66 20 46 |23..624.|#ifdef F|
|000030d0| 44 4f 50 45 4e 0d 36 32 | 35 09 23 6c 69 6e 65 20 |DOPEN.62|5.#line |
|000030e0| 30 20 66 64 6f 70 65 6e | 0d 36 32 36 09 46 49 4c |0 fdopen|.626.FIL|
|000030f0| 45 09 2a 66 64 6f 70 65 | 6e 28 76 6f 6c 72 65 66 |E.*fdope|n(volref|
|00003100| 2c 6e 61 6d 65 70 74 72 | 2c 74 79 70 65 29 0d 36 |,nameptr|,type).6|
|00003110| 32 37 09 09 69 6e 74 09 | 09 76 6f 6c 72 65 66 3b |27..int.|.volref;|
|00003120| 0d 36 32 38 09 09 63 68 | 61 72 09 2a 6e 61 6d 65 |.628..ch|ar.*name|
|00003130| 70 74 72 2c 2a 74 79 70 | 65 3b 0d 36 32 39 09 7b |ptr,*typ|e;.629.{|
|00003140| 0d 36 33 30 09 09 72 65 | 74 75 72 6e 28 78 66 6f |.630..re|turn(xfo|
|00003150| 70 65 6e 28 76 6f 6c 72 | 65 66 2c 6e 61 6d 65 70 |pen(volr|ef,namep|
|00003160| 74 72 2c 74 79 70 65 2c | 4e 55 4c 4c 29 29 3b 0d |tr,type,|NULL));.|
|00003170| 36 33 31 09 0d 36 33 32 | 09 7d 0d 36 33 33 09 0d |631..632|.}.633..|
|00003180| 36 33 34 09 23 6c 69 6e | 65 20 30 20 66 64 72 65 |634.#lin|e 0 fdre|
|00003190| 6f 70 65 6e 0d 36 33 35 | 09 46 49 4c 45 09 2a 66 |open.635|.FILE.*f|
|000031a0| 64 72 65 6f 70 65 6e 28 | 76 6f 6c 72 65 66 2c 6e |dreopen(|volref,n|
|000031b0| 61 6d 65 70 74 72 2c 74 | 79 70 65 2c 77 68 6f 29 |ameptr,t|ype,who)|
|000031c0| 0d 36 33 36 09 09 69 6e | 74 09 09 76 6f 6c 72 65 |.636..in|t..volre|
|000031d0| 66 3b 0d 36 33 37 09 09 | 63 68 61 72 09 2a 6e 61 |f;.637..|char.*na|
|000031e0| 6d 65 70 74 72 2c 2a 74 | 79 70 65 3b 0d 36 33 38 |meptr,*t|ype;.638|
|000031f0| 09 09 46 49 4c 45 09 2a | 77 68 6f 3b 0d 36 33 39 |..FILE.*|who;.639|
|00003200| 09 0d 36 34 30 09 7b 0d | 36 34 31 09 09 69 66 28 |..640.{.|641..if(|
|00003210| 66 63 6c 6f 73 65 28 77 | 68 6f 29 29 20 72 65 74 |fclose(w|ho)) ret|
|00003220| 75 72 6e 28 4e 55 4c 4c | 29 3b 0d 36 34 32 09 09 |urn(NULL|);.642..|
|00003230| 72 65 74 75 72 6e 28 78 | 66 6f 70 65 6e 28 76 6f |return(x|fopen(vo|
|00003240| 6c 72 65 66 2c 6e 61 6d | 65 70 74 72 2c 74 79 70 |lref,nam|eptr,typ|
|00003250| 65 2c 77 68 6f 29 29 3b | 0d 36 34 33 09 7d 0d 36 |e,who));|.643.}.6|
|00003260| 34 34 09 23 65 6e 64 69 | 66 0d 36 34 35 09 0d 2d |44.#endi|f.645..-|
|00003270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00003290| 33 34 39 09 09 69 66 28 | 66 63 6c 6f 73 65 28 77 |349..if(|fclose(w|
|000032a0| 68 6f 29 29 20 72 65 74 | 75 72 6e 28 4e 55 4c 4c |ho)) ret|urn(NULL|
|000032b0| 29 3b 0d 33 35 30 09 09 | 72 65 74 75 72 6e 28 78 |);.350..|return(x|
|000032c0| 66 6f 70 65 6e 28 6e 61 | 6d 65 70 74 72 2c 74 79 |fopen(na|meptr,ty|
|000032d0| 70 65 2c 77 68 6f 29 29 | 3b 0d 33 35 31 09 7d 0d |pe,who))|;.351.}.|
|000032e0| 33 35 32 09 0d 33 35 33 | 09 0d 0d 31 38 20 6d 69 |352..353|...18 mi|
|000032f0| 73 6d 61 74 63 68 65 73 | 2e 0d 0d 2a 2a 2a 2a 2a |smatches|...*****|
|00003300| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003310| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 09 0d 46 69 6c |********|***..Fil|
|00003320| 65 6e 61 6d 65 3a 20 20 | 73 74 64 69 6f 2e 68 2c |ename:  |stdio.h,|
|00003330| 20 6e 65 77 20 66 69 6c | 65 2e 0d 2d 2d 2d 2d 2d | new fil|e..-----|
|00003340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 46 69 6c 65 |--------|---.File|
|00003360| 6e 61 6d 65 3a 20 20 73 | 74 64 69 6f 2e 68 2c 20 |name:  s|tdio.h, |
|00003370| 6f 72 69 67 69 6e 61 6c | 20 66 69 6c 65 2e 0d 0d |original| file...|
|00003380| 37 09 20 2a 20 28 43 29 | 20 43 6f 70 79 72 69 67 |7. * (C)| Copyrig|
|00003390| 68 74 20 31 39 38 35 2c | 20 31 39 38 36 2e 20 54 |ht 1985,| 1986. T|
|000033a0| 48 49 4e 4b 20 54 65 63 | 68 6e 6f 6c 6f 67 69 65 |HINK Tec|hnologie|
|000033b0| 73 20 49 6e 63 2e 20 41 | 6c 6c 20 72 69 67 68 74 |s Inc. A|ll right|
|000033c0| 73 20 72 65 73 65 72 76 | 65 64 2e 0d 38 09 20 2a |s reserv|ed..8. *|
|000033d0| 0d 39 09 20 2a 20 41 64 | 64 65 64 20 69 6e 20 66 |.9. * Ad|ded in f|
|000033e0| 64 6f 70 65 6e 28 29 20 | 26 20 66 64 72 65 6f 70 |dopen() |& fdreop|
|000033f0| 65 6e 28 29 2c 20 4e 69 | 67 65 6c 20 50 65 72 72 |en(), Ni|gel Perr|
|00003400| 79 2c 20 31 39 38 39 0d | 31 30 09 20 2a 2f 0d 2d |y, 1989.|10. */.-|
|00003410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00003430| 37 09 20 2a 20 28 43 29 | 20 43 6f 70 79 72 69 67 |7. * (C)| Copyrig|
|00003440| 68 74 20 31 39 38 35 2c | 20 31 39 38 36 2e 20 54 |ht 1985,| 1986. T|
|00003450| 48 49 4e 4b 20 54 65 63 | 68 6e 6f 6c 6f 67 69 65 |HINK Tec|hnologie|
|00003460| 73 20 49 6e 63 2e 20 41 | 6c 6c 20 72 69 67 68 74 |s Inc. A|ll right|
|00003470| 73 20 72 65 73 65 72 76 | 65 64 2e 0d 38 09 20 2a |s reserv|ed..8. *|
|00003480| 2f 0d 0d 37 32 09 46 49 | 4c 45 09 2a 66 72 65 6f |/..72.FI|LE.*freo|
|00003490| 70 65 6e 28 29 3b 09 09 | 2f 2a 20 6f 70 65 6e 20 |pen();..|/* open |
|000034a0| 61 20 66 69 6c 65 20 75 | 73 69 6e 67 20 74 68 65 |a file u|sing the|
|000034b0| 20 67 69 76 65 6e 20 73 | 74 72 65 61 6d 20 2a 2f | given s|tream */|
|000034c0| 0d 37 33 09 46 49 4c 45 | 09 2a 66 64 6f 70 65 6e |.73.FILE|.*fdopen|
|000034d0| 28 29 3b 09 09 2f 2a 20 | 6f 70 65 6e 20 61 20 66 |();../* |open a f|
|000034e0| 69 6c 65 20 75 73 69 6e | 67 20 76 6f 6c 72 65 66 |ile usin|g volref|
|000034f0| 2f 6e 61 6d 65 20 70 61 | 69 72 20 2a 2f 0d 37 34 |/name pa|ir */.74|
|00003500| 09 46 49 4c 45 09 2a 66 | 64 72 65 6f 70 65 6e 28 |.FILE.*f|dreopen(|
|00003510| 29 3b 09 2f 2a 20 6f 70 | 65 6e 20 61 20 66 69 6c |);./* op|en a fil|
|00003520| 65 20 75 73 69 6e 67 20 | 76 6f 6c 72 65 66 2f 6e |e using |volref/n|
|00003530| 61 6d 65 20 70 61 69 72 | 20 6f 6e 20 74 68 65 20 |ame pair| on the |
|00003540| 67 69 76 65 6e 20 73 74 | 72 65 61 6d 20 2a 2f 0d |given st|ream */.|
|00003550| 37 35 09 65 78 74 65 72 | 6e 09 46 49 4c 45 09 5f |75.exter|n.FILE._|
|00003560| 66 69 6c 65 5b 5f 4e 46 | 49 4c 45 5d 3b 09 2f 2a |file[_NF|ILE];./*|
|00003570| 20 66 69 6c 65 20 64 65 | 73 63 72 69 70 74 6f 72 | file de|scriptor|
|00003580| 20 61 72 72 61 79 20 28 | 69 6e 74 65 72 6e 61 6c | array (|internal|
|00003590| 29 20 2a 2f 0d 37 36 09 | 65 78 74 65 72 6e 09 46 |) */.76.|extern.F|
|000035a0| 49 4c 45 09 5f 63 6f 6e | 73 6f 6c 65 5f 3b 09 09 |ILE._con|sole_;..|
|000035b0| 2f 2a 20 64 65 76 69 63 | 65 20 6e 61 6d 65 20 66 |/* devic|e name f|
|000035c0| 6f 72 20 74 68 65 20 63 | 6f 6e 73 6f 6c 65 20 2a |or the c|onsole *|
|000035d0| 2f 0d 37 37 09 6c 6f 6e | 67 09 66 74 65 6c 6c 28 |/.77.lon|g.ftell(|
|000035e0| 29 3b 09 09 2f 2a 20 67 | 65 74 20 70 6f 73 69 74 |);../* g|et posit|
|000035f0| 69 6f 6e 20 77 69 74 68 | 69 6e 20 66 69 6c 65 20 |ion with|in file |
|00003600| 2a 2f 0d 37 38 09 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |*/.78..-|--------|
|00003610| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003620| 2d 2d 2d 2d 2d 2d 2d 0d | 37 30 09 46 49 4c 45 09 |-------.|70.FILE.|
|00003630| 2a 66 72 65 6f 70 65 6e | 28 29 3b 09 09 2f 2a 20 |*freopen|();../* |
|00003640| 6f 70 65 6e 20 61 20 66 | 69 6c 65 20 75 73 69 6e |open a f|ile usin|
|00003650| 67 20 74 68 65 20 67 69 | 76 65 6e 20 73 74 72 65 |g the gi|ven stre|
|00003660| 61 6d 20 2a 2f 0d 37 31 | 09 65 78 74 65 72 6e 09 |am */.71|.extern.|
|00003670| 46 49 4c 45 09 5f 66 69 | 6c 65 5b 5f 4e 46 49 4c |FILE._fi|le[_NFIL|
|00003680| 45 5d 3b 09 2f 2a 20 66 | 69 6c 65 20 64 65 73 63 |E];./* f|ile desc|
|00003690| 72 69 70 74 6f 72 20 61 | 72 72 61 79 20 28 69 6e |riptor a|rray (in|
|000036a0| 74 65 72 6e 61 6c 29 20 | 2a 2f 0d 37 32 09 65 78 |ternal) |*/.72.ex|
|000036b0| 74 65 72 6e 09 46 49 4c | 45 09 5f 63 6f 6e 73 6f |tern.FIL|E._conso|
|000036c0| 6c 65 5f 3b 09 09 2f 2a | 20 64 65 76 69 63 65 20 |le_;../*| device |
|000036d0| 6e 61 6d 65 20 66 6f 72 | 20 74 68 65 20 63 6f 6e |name for| the con|
|000036e0| 73 6f 6c 65 20 2a 2f 0d | 37 33 09 6c 6f 6e 67 09 |sole */.|73.long.|
|000036f0| 66 74 65 6c 6c 28 29 3b | 09 09 2f 2a 20 67 65 74 |ftell();|../* get|
|00003700| 20 70 6f 73 69 74 69 6f | 6e 20 77 69 74 68 65 6e | positio|n withen|
|00003710| 20 66 69 6c 65 20 2a 2f | 0d 37 34 09 0d 0d 0d 32 | file */|.74....2|
|00003720| 20 6d 69 73 6d 61 74 63 | 68 65 73 2e 0d 0d 00 00 | mismatc|hes.....|
|00003730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003780| 00 00 01 00 00 00 01 13 | 00 00 00 13 00 00 00 46 |........|.......F|
|00003790| c0 41 ee ff c0 21 6e 00 | 08 00 12 31 6e 00 0c 00 |.A...!n.|...1n...|
|000037a0| 16 a0 13 4e 5e 4e 75 50 | c0 60 02 51 c0 4e 56 ff |...N^NuP|.`.Q.NV.|
|000037b0| 12 73 74 64 69 6f 20 65 | 6e 68 61 6e 63 65 6d 65 |.stdio e|nhanceme|
|000037c0| 6e 74 73 74 02 00 00 00 | 54 45 58 54 4d 41 43 41 |ntst....|TEXTMACA|
|000037d0| 00 00 54 45 58 54 4d 41 | 43 41 00 00 02 40 00 b8 |..TEXTMA|CA...@..|
|000037e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000037f0| 00 00 a1 60 07 ed 00 00 | 36 ae 00 00 01 59 16 4e |...`....|6....Y.N|
|00003800| 5e 4e 75 4e 56 ff ce 41 | ee ff ce 31 6e 00 08 00 |^NuNV..A|...1n...|
|00003810| 18 21 6e 00 0a 00 1c a0 | 12 4e 5e 4e 75 4e 56 ff |.!n.....|.N^NuNV.|
|00003820| ce 41 ee ff ce 31 6e 00 | 08 00 18 31 6e 00 0a 00 |.A...1n.|...1n...|
|00003830| 2c 21 6e 00 0c 00 2e a0 | 44 4e 5e 4e 75 4e 56 ff |,!n.....|DN^NuNV.|
|00003840| c0 41 ee ff c0 21 6e 00 | 08 00 12 31 6e 00 0c 00 |.A...!n.|...1n...|
|00003850| 16 a0 15 4e 5e 4e 75 00 | 00 02 1d 00 0d 10 54 68 |...N^Nu.|......Th|
|00003860| 65 20 64 69 73 6b 20 69 | 73 20 66 75 6c 6c 25 54 |e disk i|s full%T|
|00003870| 68 65 20 64 69 73 6b 20 | 69 73 20 77 72 69 74 65 |he disk |is write|
|00003880| 00 00 00 03 00 0a 00 00 | 00 00 08 04 15 00 00 00 |........|........|
|00003890| 3c 00 02 00 00 01 00 00 | 00 01 13 00 00 00 13 00 |<.......|........|
|000038a0| 00 00 46 00 02 c7 34 06 | fc 00 00 00 1c 00 46 00 |..F...4.|......F.|
|000038b0| 01 45 46 4e 54 00 00 00 | 12 6d 57 52 54 00 00 00 |.EFNT...|.mWRT...|
|000038c0| 1e 03 eb ff ff 00 00 00 | 00 00 02 c4 04 00 00 ff |........|........|
|000038d0| ff 00 00 00 07 00 02 c3 | e4 00 00 00 00 00 00 00 |........|........|
|000038e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000038f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+